Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Sending/Receiving faxes
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9
OS:
Windows Server 2003
Network:
Windows 2003 Server
Database:
MS SQL Server
Divers
Thread ID:
01044886
Message ID:
01045034
Vues:
31
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?
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform