Error in sending

[Smilesmita]

Hello everyone,

Following os my code and i am getting error on MyDocuments.Send line.Also i am using Winfax on my local machine.Error nu is (0x8007000D)
Please help somebody
Here is the code:
<(e-mail address removed) = VBScript%>
<%
Dim MyFax, MyDocuments, MyFile
Set MyFax = Server.CreateObject("FaxServer.Faxserver.1")
MyFax.Connect("Cheryl")

MyFile = Server.MapPath("fax.asp")
Set MyDocuments = MyFax.CreateDocument(MyFile)
MyDocuments.FaxNumber = "13308818793"
MyDocuments.Send
MyFax.DisConnect
Set MyDocuments = Nothing
Set MyFax = Nothing
Response.write "Fax is successfully sent!"
%>