View Single Post
  #1  
Old June 21st, 2006, 06:39 PM posted to microsoft.public.outlook.fax
external usenet poster
 
Posts: n/a
Default Error: 800710DB received for ConnectedSubmit

I receive error: 800710D8 when trying to fax through VB. After
searching the error
on Google, I found out that the error means that the fax printer isn't
installed on the client machine.

The network fax that is installed on my PC (Win XP Pro SP2) is the fax
modem on the server. The fax icon in "Printers and Faxes" is a MS
Shared Fax Driver and clicking on opens up Fax Console. So I should be

able to send a fax through the vb code and that fax should appear in
the Fax Console.

If I have a MS Fax Shared Driver installed then why the error?

Here is the code:

Dim objFaxServer As FAXCOMEXLib.FaxServer
Dim objFaxDocument As FAXCOMEXLib.FaxDocument
Dim objFaxDevice As FAXCOMEXLib.FaxDevice
Dim jobid As Variant

On Error GoTo Error_Handler

Set objFaxServer = New FAXCOMEXLib.FaxServer
Set objFaxDocument = New FAXCOMEXLib.FaxDocument
objFaxServer.Connect "svrimage.centurysd.com"
Set objFaxDevice = objFaxServer.GetDevices.Item(3)
objFaxDevice.SendEnabled = True 'Not sure if I need this proprety
objFaxDevice.Save 'Not sure if I need this proprety
objFaxDocument.Body = "C:Test.txt"
objFaxDocument.Recipients.Add "fax #", "Test"
jobid = objFaxDocument.ConnectedSubmit(objFaxServer)
MsgBox "The jobid is " & jobid
Set objFaxServer = Nothing
Set objFaxDocument = Nothing
Set objFaxDevice = Nothing

Error_Handler:

MsgBox "Error number: " & Hex(Err.Number) & ", " & Err.Description

Thanks.