D
dreamorder
Гость
Доброго времени суток гос-да программисты.
Благодаря помощи отзывчивых людей этого форума, написал скрипт, в нём есть вот такой модуль(пример с форума):
при не стабильной связи с инетом, ну или разрыве, скрипт конечно не работает и выдаёт ошибку:
---------------------------
AutoIt Error
---------------------------
Line 86 (File "C:\Users\Gosha\Desktop\ssis.au3"):
$hMAIL.Send
$hMAIL.Send^ ERROR
Error: The requested action with this object has failed.
---------------------------
ОК
---------------------------
Очень прошу, помогите пожалуйста "поймать ошибку", и к примеру выйти из скрипта при разрыве связи,
но при этом, что бы окно Autoit Error не вылазило.
Заранее всем спасибо.
Благодаря помощи отзывчивых людей этого форума, написал скрипт, в нём есть вот такой модуль(пример с форума):
Код:
Case $Button1
Call('_send')
_send("дети", "Забери ребёнка из сада", "")
Func _send($Body, $Subject, $Attachment)
$Text = GUICtrlRead($texty, 1) ; возвращает текст пункта меню
$FromAddress = '[email protected]'
$ToAddress = '[email protected]'
$Body = $Text
$SMTPServer = 'smtp.yandex.ru'
$Username = '[email protected]'
$Password = "v22gg3456kkghfe"
$Port = '25'
$str = "http://schemas.microsoft.com/cdo/configuration/"
$hMAIL = ObjCreate ("CDO.Message")
With $hMAIL
.From = $FromAddress
.To = $ToAddress
.Subject = $Subject
.TextBody = $Body
.AddAttachment ($Attachment)
EndWith
With $hMAIL.Configuration.Fields
.Item ($str & "sendusing") = 2
.Item ($str & "smtpserver") = $SMTPServer
.Item ($str & "smtpauthenticate") = 1
.Item ($str & "sendusername") = $Username
.Item ($str & "sendpassword") = $Password
.Item ($str & "smtpserverport") = $Port
.Update
EndWith
$hMAIL.Send
EndFunc
при не стабильной связи с инетом, ну или разрыве, скрипт конечно не работает и выдаёт ошибку:
---------------------------
AutoIt Error
---------------------------
Line 86 (File "C:\Users\Gosha\Desktop\ssis.au3"):
$hMAIL.Send
$hMAIL.Send^ ERROR
Error: The requested action with this object has failed.
---------------------------
ОК
---------------------------
Очень прошу, помогите пожалуйста "поймать ошибку", и к примеру выйти из скрипта при разрыве связи,
но при этом, что бы окно Autoit Error не вылазило.
Заранее всем спасибо.