Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
FaxMan Jr. and Status property in a VFP 6 form?
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Titre:
FaxMan Jr. and Status property in a VFP 6 form?
Divers
Thread ID:
00740159
Message ID:
00740159
Vues:
66
I use FaxMan Jr. in a VFP 6 form that faxes files. The problem I am having is that after I do THISFORM.FaxManJr1.SendFax command I don't know how to pause the commands until the fax sends because it loops back thru and tries to send the same fax again and gives me an exception error that I cannot send a fax while another is sending. I get it, but how do I halt processing until FaxMan is ready to send again. I saw the FaxMan documentation and there is a THISFORM.FaxManJr1.Status where if status is equal to 1 the Fax device is ready and has completed its last send. But when I stick that command in my code I get an error because VFP thinks .STATUS is reserved for VFP. Is there a way to fake it out?

Here's my FaxManJr code in my VFP form:
DO WHILE..... and code continues to build files to send...
then comes FaxManJr portion of code in my VFP 6 form...
* Send Fax
cStatus = "Dialing and FAXing " + ALLT(THISFORM.FaxManJr1.FaxNumber)+ ;
	" for Patient ID "+SUBSTR(faxreq.patid,9,8) + " ....."
  WITH THISFORM
   .cStatus.Refresh
   .FaxManJr1.UserCompany = "MEDICAL CONTROL COMMUNICATIONS OFFICER"
   .FaxManJr1.UserFaxNumber = "(727)582-2076"
   .FaxManJr1.FaxBanner = "Date: %d Time: %t|%m|%x      Page %c of %p"
   .FaxManJr1.ImportFiles("c:\patient.fmf",filenames)
   .FaxManJr1.FaxFiles = "c:\patient.fmf" 
   .FaxManJr1.SendFax
  ENDWITH
 ENDIF
ENDDO
Thanks for the help.
Steve Kramer
Kramer & Kramer Design
"Home of Go Cartoons"
Web Site: www.stephenkramer.com
Would you believe Far Side Lite?
More than 270 original cartoons.
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform