コードのこの行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