VB 发送邮件的问题，急等！！！

我用Access 写了一段程序，希望可以发送e-mail ,但每次运行到MyMail.SendMail的时候，Log 文件中总会显示
“VB Error 53: File  doesn't exist” ， 没有任何错误提示，也收不到e-mail。请各位高手指点，谢谢！！！Option Compare DatabasePublic MyMail As MailDll  ' need to declare this
Public strMail As String'
Dim strToServer, strTomail, strFromMail As String
Dim strContent As String
Dim strAttachment As String'=============================
Set MyMail = New MailDll
strToServer = "scmh1.nsc.com"
strTomail = "[email protected],[email protected],[email protected]"
strFromMail = "[email protected]"
MyMail.ToServer = strToServer
MyMail.ToMail = strTomail
MyMail.FromMail = strFromMail
MyMail.ToMessage = Content & vbCrLf & "======================"
MyMail.ToSubject = Subject
MyMail.Mail_Log = CurrentProject.Path & "\ePCPerf.txt"  'Log file path
MyMail.SendMail'=============================
Set MyMail = NothingExit SubErrorHandler:
  Open CurrentProject.Path & "\ePCPerf.txt" For Append As #4  'Error file path
  Print #4, Err.Description
  Close #4
End Sub