Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Sending/Receiving faxes
Message
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 9
OS:
Windows Server 2003
Network:
Windows 2003 Server
Database:
MS SQL Server
Miscellaneous
Thread ID:
01044886
Message ID:
01045034
Views:
33
Hi Christof
I checked this method a while ago, but i couldn't achieve running it on a server from a workstation. Do you have any idea how to achieve this? It could be very useful...
Jaime

>Hi Roy,
>
>>1) I would like to implement a fax server.
>
>Do you have Windows XP or Windows Server 2003? In this case, you can use the Microsoft Fax Services for sending faxes like this:
>
>*--------------------------------------------------------
>* We send the fax from this machine
>*--------------------------------------------------------
>Local loFaxServer
>loFaxServer = CreateObject("FAXCOMEX.FaxServer")
>loFaxServer.Connect( "" )
>
>*--------------------------------------------------------
>* Create a fax new document and attach a Word document
>*--------------------------------------------------------
>Local loFaxDocument
>loFaxDocument = CreateObject("FAXCOMEX.FaxDocument")
>loFaxDocument.Body = FullPath("MyFax.doc")
>loFaxDocument.DocumentName = "Special offer"
>loFaxDocument.Priority = 2 && fptHIGH
>loFaxDocument.ReceiptType = 0 && frtNONE
>loFaxDocument.ScheduleType = 0 && fstNOW
>
>*--------------------------------------------------------
>* Specify information for the cover page
>*--------------------------------------------------------
>loFaxDocument.CoverPageType = 2 && fcptSERVER
>loFaxDocument.CoverPage = "generic"
>loFaxDocument.Note = "Text on the cover page"
>loFaxDocument.Subject = "Hello World fax"
>
>*--------------------------------------------------------
>* Add a recipient
>*--------------------------------------------------------
>loFaxDocument.Recipients.Add( "68267082", "Christof" )
>
>*--------------------------------------------------------
>* Specify the sender. Use the default sender here.
>*--------------------------------------------------------
>loFaxDocument.Sender.LoadDefaultSender()
>
>*--------------------------------------------------------
>* Submit the document to the fax server
>*--------------------------------------------------------
>Local lcJobID
>lcJobID = loFaxDocument.ConnectedSubmit(loFaxServer)
>
>With the job ID you can later query the status of the fax. Check out the documentation on http://msdn.microsoft.com/library/default.asp?url=/library/en-us/fax/faxusing_7p2r.asp for more details.
Why do programs stop working correctly as soon as you leave the Fox?
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform