Что нового

[Ошибки] Учесть ошибки в работе функции _INetSmtpMailCom()

joiner

Модератор
Локальный модератор
Сообщения
3 385
Репутация
592
Код:
Func _INetSmtpMailCom()
	$objEmail = ObjCreate("CDO.Message")
	With $objEmail
		.From = "от кого"
		.To = "кому"
		.Subject = "ЗАГОЛОВОК ПИСЬМА"
		.Textbody = "СОДЕРЖАНИЕ_ПИСЬМА"
		.AddAttachment("")
	EndWith
	With $objEmail.Configuration.Fields
		.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
		.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.ххххх.хх"
		.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 25
		.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
		.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "логин"
		.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "пароль "
		.Update
	EndWith
	$objEmail.Send
EndFunc
если запустить функция с неправильными параметрами (несуществующий ящик, неправильный параметр SMTP), то появляется ошибка
Код:
The requested action with this object has failed.:
$objEmail.Send
$objEmail.Send^ ERROR
как я понял из за ошибочных параметров невозможно совершение действий с объектом.
как учесть эту ошибку, чтобы не было завершение работы скрипта?
 

madmasles

Модератор
Глобальный модератор
Сообщения
7 790
Репутация
2 320
Александр
Смотрите в справке второй пример к функции ObjEvent(), тот, где
Код:
;...
$oMyError = ObjEvent("AutoIt.Error","MyErrFunc")
;...
 
Верх