ra4o
14-11-2014, 14:22
Добрый день! Возникла проблема при переходе на новую версию AutoIt - ругается на строку .To = "кому"
Пишет:"error: missing separator character before keyword." Этот скрипт с ранней версией работает нормально, в чем проблема ?
$str = "http://schemas.microsoft.com/cdo/configuration/"
$hMAIL = ObjCreate ("CDO.Message")
With $hMAIL
.From = "от кого";
.To = "кому"
.Subject = "Test"
.TextBody = "Test mail"
.AddAttachment ("") ;файл для отправки
EndWith
With $hMAIL.Configuration.Fields
.Item ($str & "sendusing") = 2
.Item ($str & "smtpserver") = "smtp.inbox.ru" ;SMTP Server
.Item ($str & "smtpusessl") = True
.Item ($str & "smtpauthenticate") = 1
.Item ($str & "sendusername") = "исходящий адрес"
.Item ($str & "sendpassword") = "пароль почты" ;Пароль SMTP-сервер
.Item ($str & "smtpserverport") = 2525 ;Порт
.Update
EndWith
$hMAIL.Send
Пишет:"error: missing separator character before keyword." Этот скрипт с ранней версией работает нормально, в чем проблема ?
$str = "http://schemas.microsoft.com/cdo/configuration/"
$hMAIL = ObjCreate ("CDO.Message")
With $hMAIL
.From = "от кого";
.To = "кому"
.Subject = "Test"
.TextBody = "Test mail"
.AddAttachment ("") ;файл для отправки
EndWith
With $hMAIL.Configuration.Fields
.Item ($str & "sendusing") = 2
.Item ($str & "smtpserver") = "smtp.inbox.ru" ;SMTP Server
.Item ($str & "smtpusessl") = True
.Item ($str & "smtpauthenticate") = 1
.Item ($str & "sendusername") = "исходящий адрес"
.Item ($str & "sendpassword") = "пароль почты" ;Пароль SMTP-сервер
.Item ($str & "smtpserverport") = 2525 ;Порт
.Update
EndWith
$hMAIL.Send