Прошу помочь дилетанту..
Есть скрипт, который при запуске отсылает на email некоторую информацию, после чего (вне зависимости от того, удалось отправить письмо или нет) скрипт должен продолжить свою работу.
Но... при неудачной отправке (к примеру, я сменил пароль на почте, а в скрипте он остался старым), вываливается ошибка и скрипт падает не завершив все последующие задачи.
Можно ли как-то проигнорировать данную ошибку и продолжить выполнение скрипта?
Пример:
Есть скрипт, который при запуске отсылает на email некоторую информацию, после чего (вне зависимости от того, удалось отправить письмо или нет) скрипт должен продолжить свою работу.
Но... при неудачной отправке (к примеру, я сменил пароль на почте, а в скрипте он остался старым), вываливается ошибка и скрипт падает не завершив все последующие задачи.
Можно ли как-то проигнорировать данную ошибку и продолжить выполнение скрипта?
Пример:
Код:
_send ('Текст', 'Тема')
MsgBox(0, 'script', 'finish')
Func _send($Body, $Subject)
$FromAddress = '[email protected]' ; Адрес отправителя
$ToAddress = '[email protected]' ; Адрес получателя
$Username = '[email protected]' ; Логин отправителя
$Password = "12345" ; Пароль почты отправителя
$SMTPServer = 'smtp.gmail.com' ; SMTP-сервер
$Port = 465 ; Порт сервера
$SSL = 1 ; SSL
$conf = "http://schemas.microsoft.com/cdo/configuration/"
$hMAIL = ObjCreate ("CDO.Message")
With $hMAIL
.From = $FromAddress
.To = $ToAddress
.Subject = $Subject
.TextBody = $Body
EndWith
With $hMAIL.Configuration.Fields
.Item ($conf & "sendusing") = 2
.Item ($conf & "smtpauthenticate") = 1
.Item ($conf & "sendusername") = $Username
.Item ($conf & "sendpassword") = $Password
.Item ($conf & "smtpserver") = $SMTPServer
.Item ($conf & "smtpserverport") = $Port
.Item ($conf & "smtpusessl") = $SSL
.Update
EndWith
$hMAIL.Send
EndFunc