0

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

0 に答える 0