Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Problem With Object Fax Server
Message
General information
Forum:
Visual FoxPro
Category:
COM/DCOM and OLE Automation
Environment versions
Visual FoxPro:
VFP 9 SP1
OS:
Windows XP SP2
Miscellaneous
Thread ID:
01194099
Message ID:
01194162
Views:
22
Marc
The following code works for me to send VFP reports to the XP fax.
*** first i run the report to a TIF file which will be attached
fs = createobject("faxserver.faxserver")
fs.connect()
fd = fs.createdocument(fullpath("myfax.tif"))
fd.sendcoverpage = .F.
fd.faxnumber = "123456789"
fd.send()
lseconds = seconds()
do while seconds <= lseconds+5
enddo
fd = null
fs = null
release fs
The above code sends more or less 500 VFP reports daily without any glitch for a few years now.
I also read a note somewhere from Christof about adding SET OLEOBJECT, but i never needed it.

Jaime

>I got the following error message from Visual Foxpro when I execute SEND command. What's wrong?
>
>"OLE error code 0x80070006: Unknown COM status code"
>
>My VFP code is the following:
>x=createobject('faxserver.faxserver')
>lcMachine='\\'+getwordnum(sys(0),1)
>x.connect(lcMachine)
>fd=x.createdocument('filename')
>fd.faxnumber='999-999-9999'
>fd.displayname='VFP Fax Message'
>fd.filename=fullpath('samplefax.doc')
>fd.sendcoverpage=.f.
>fd.send && I got the error here
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