我的代码中的这一行有问题Set Mail = Server.CreateObject("Persits.MailSender")
。这段代码以前可以正常工作。突然之间,它开始抛出一个错误,说明创建对象失败。任何人都可以建议解决方法吗?
Set Mail = Server.CreateObject("Persits.MailSender")"
' enter valid SMTP host
Mail.Host = "smtpeu1-css.shell.com"
Mail.From = "SHIPLocalHost@shell.com"
Mail.FromName = "SHIPLocalHost@shell.com"
Mail.AddAddress defaultTestEmail, defaultTestEmailName
'If(len(emailCCEmail)>0)Then
'Mail.AddAddress defaultTestEmailCC , defaultTestEmailCCName
'End If
Mail.Subject = subject
Mail.IsHTML = True
'send an email for SSR
Mail.Body= mailbody
'Mail.AddAttachment "C:\Apps\SHIP from PROD\ship\ship\UploadedFiles\" & strFileName
Mail.AddAttachment FilePath
Mail.Send