Неизвестный код электронной почты из метода отправки CDO.Message

Я пытаюсь отправить электронное письмо через VBScript. Вот мой код электронной почты: я, конечно, скрыл адрес электронной почты. В моем фактическом коде я использую действующий адрес электронной почты.

Dim objCDO
Set objCDO = Server.CreateObject("CDO.Message") 
objCDO.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.oa.caiso.com" 
objCDO.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25 
objCDO.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 
objCDO.Configuration.Fields("http://schemas.microsoft.com/cdo/configuration/smtpconnectiontimeout") = 60 
objCDO.Configuration.Fields.Update 
objCDO.To = "[email protected]"
objCDO.From = Sender
objCDO.cc = ""
objCDO.bcc = ""
objCDO.Subject = txtSubject
objCDO.HTMLBody = Replace(sBody, Chr(10),"<br>")
On Error GoTo 0
On Error Resume Next
objCDO.Send
If Err.Number <> 0 Then 
    Response.Write "Just after the send command "
    Response.Write "Err.Number is " & Err.Number & "<br>"
    On Error GoTo 0
End If
set objCDO = nothing

Когда этот код запускается, я вижу следующую ошибку:

Сразу после отправки команды Err.Number -2147220978

Теперь, когда я исследую этот номер ошибки, нигде нет ссылки на код ошибки -2147220978. По сути, поиск в Google по номеру -2147220978 не возвращает результатов вообще.

Не могли бы вы понять, что означает этот странный код ошибки?

Ответы на вопрос(3)

Ваш ответ на вопрос