После обновления AutoIt до 12.0 появилась ошибка с объектом в отправке e-mail

[Юрий]

День добрый. При версии 10.1 всё работало, обновился - ошибка.

Код функции:

Спойлер

Func SendAnEmail()
	Local $ToAdress$SmtpServer, $FromName, $FromAddress, $Subject, $Body, $Username, $Password, $IPPort, $ssl
	$SmtpServer = "smtp.yandex.ru"
	$FromName = "Name"
	$FromAddress = "[email protected]"
	$Subject = "subj"
	$Body = "body"
	$Username = "username"
	$Password = "pass"
	$IPPort = 465
	$ssl = 1
	Local $objEmail = ObjCreate("CDO.Message")
	$objEmail.From = '"' & $FromName & '" <' & $FromAddress & ">"
	$objEmail.To = $ToAddress		; <<< Ошибка здесь: missing separator character before keyword.
	; если написать $objEmail.To1 - ошибки нет, но и письмо-то не отсылается
	$objEmail.Subject = $Subject
	$objEmail.HTMLBody = $Body

	$objEmail.AddAttachment("f.jpg")

	$objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2
	$objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = $SmtpServer
	$objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = $IPPort
	$objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1
	$objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = $Username
	$objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = $Password
	If $ssl Then $objEmail.Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True
	$objEmail.Configuration.Fields.Update
	$objEmail.Fields.Item("urn:schemas:mailheader:Importance") = "High"
	$objEmail.Fields.Update
	$objEmail.Send
	$objEmail = ""
EndFunc

 

[alex33]

Как быть если свойством или методом объекта является ключевое слово AutoIt

alex33
Тут пишут, что в бета-версии SciTE исправлено http://www.autoitscript.com/trac/autoit/ticket/2780

 

[Юрий]

alex33 [?]

Как быть если свойством или методом объекта является ключевое слово AutoIt

Так я и не понял в чём беда. Найти новый Au3Check не смог. Откатился до 10.1.

 

[alex33]

Юрий
В самом начале скрипта на первую строку вставь

#AutoIt3Wrapper_Run_AU3Check=n

 

[Юрий]

Спасибо :IL_AutoIt_1: