Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
FaxMan Jr. and Status property in a VFP 6 form?
Message
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Title:
FaxMan Jr. and Status property in a VFP 6 form?
Miscellaneous
Thread ID:
00740159
Message ID:
00740159
Views:
65
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.
Next
Reply
Map
View

Click here to load this message in the networking platform