Error 800710d8 using FXSCOMEX Headache

Dear All

Thanks in Advance for your help

I am using window 2003 server SP1 as my fax client and another system
having the same OS as my remote Fax Server. Here is my code

Dim FaxServer As New FAXCOMEXLib.FaxServer
Dim FaxDoc As New FAXCOMEXLib.FaxDocument
Dim server
Dim fs, fname
Set fs = CreateObject("Scripting.FileSystemObject")
Set fname = fs.CreateTextFile("D:\test.txt", True)
fname.WriteLine (CStr(Now) & "Fax server and fax document objects
created!")

server = "\\" & faxServerName

FaxServer.Connect server
fname.WriteLine (CStr(Now) & "After FaxServer.Connect")

FaxDoc.Body = "D:\faxdocument\document.txt"
FaxDoc.DocumentName = "My First Fax"
FaxDoc.Recipients.Add faxNumber, "Adnan"
FaxDoc.Sender.Name = "John Doe"
fname.WriteLine (CStr(Now) & "After setting document properties")

FaxDoc.ConnectedSubmit FaxServer
fname.WriteLine (CStr(Now) & "Fax sent")
FaxServer.Disconnect
fname.Close

This code works very well when i use it in my windows application. But
when i use it for my web application, it gives me the error 800710d8
operation failed. At first i was getting the error Access Denied. I
resolved that issue by giving my iis user the administrator rights.
After resolving that issue i am stuck at this now. It has really given
me HEADACHE. Plzzzzzzz help

Thanks
Adnan Anayat