"FaxComEx.FaxDocument.1 Operation failed" when ConnectedSubmit

[MarcLev]

The Fax Server Is On Windows 2003. My account is Admin. The Fax is added as printer and shared. I don't understand where is the problem. Any idea?

IF FILE("&MyDocFile")
objFaxServer=Createobject("FAXCOMEX.FaxServer")
IF TYPE('objFaxServer') = "O"
oSERVERNAME = "MyServerName"
objFaxServer.CONNECT(oSERVERNAME)
objFaxDocument=Createobject("FAXCOMEX.FaxDocument")
IF TYPE('objFaxDocument') = "O"
objFaxDocument.Body = "&MyDocFile" && also tried with TXT file.
objFaxDocument.Recipients.Add("9991234567")
lcJobId = objFaxDocument.ConnectedSubmit(objFaxServer) && error occurs here.
ENDIF
ENDIF
ENDIF