O
Ones Self
Hi all,
I'm trying to fax using FaxServer. If I send a text file or even a
doc file, everyting works fine. But when I try to send an image, I
get a bunch of defferent errors.
Here's my code:
' <------------------ Snip -------------------->
Dim fs As FaxServer
Dim fd As FaxDoc
Set fs = CreateObject("FaxServer.FaxServer")
Call fs.Connect("EYAL-PC")
' This works fine
Set fd = fs.CreateDocument("C:\z\fax.txt")
' Here I get the following error:
' Method 'Send' of Object 'IFaxDoc' failed
Set fd = fs.CreateDocument("C:\z\fax.bmp")
' Here the Send method works, but the page
' that comes out of the recieving fax machine
' is all black, instead of containing the image.
Set fd = fs.CreateDocument("C:\z\fax.tiff")
fd.FaxNumber = "12125551234"
fd.Send
fs.Disconnect
Set fd = Nothing
Set fs = Nothing
' <------------------ Snip -------------------->
Any help would be appritieted.
I'm trying to fax using FaxServer. If I send a text file or even a
doc file, everyting works fine. But when I try to send an image, I
get a bunch of defferent errors.
Here's my code:
' <------------------ Snip -------------------->
Dim fs As FaxServer
Dim fd As FaxDoc
Set fs = CreateObject("FaxServer.FaxServer")
Call fs.Connect("EYAL-PC")
' This works fine
Set fd = fs.CreateDocument("C:\z\fax.txt")
' Here I get the following error:
' Method 'Send' of Object 'IFaxDoc' failed
Set fd = fs.CreateDocument("C:\z\fax.bmp")
' Here the Send method works, but the page
' that comes out of the recieving fax machine
' is all black, instead of containing the image.
Set fd = fs.CreateDocument("C:\z\fax.tiff")
fd.FaxNumber = "12125551234"
fd.Send
fs.Disconnect
Set fd = Nothing
Set fs = Nothing
' <------------------ Snip -------------------->
Any help would be appritieted.