Старожил
Сообщения: 307
Благодарности: 137
|
Профиль
|
Отправить PM
| Цитировать
Цитата SvetlanaK:
_INetSmtpMail работает, но выдает неверную кодировку »
|
Я специально попробовал отослать вот такое "письмо":
читать дальше »
Код: 
#include <INet.au3>
$s_SmtpServer = "smtp.mail.ru"
$s_FromName = "User"
$s_FromAddress = "Test@list.ru"
$s_ToAddress = "user@list.ru"
$s_Subject = "Test"
Global $as_Body[1]
$as_Body[0]='Введение в AutoIt.AutoIt v3 - это язык для написания сценариев, напоминающий BASIC. Основным его назначением является автоматизация работ с Windows GUI (графическим интерфейсом пользователя MS Windows). Для выполнения этой сложной задачи предоставляется комбинация испытанных методов, включающих в себя - симуляцию нажатий комбинаций клавиш клавиатуры, перемещения указателя мыши и управления окнами и его визуальными элементами. Как показывает практика, эти "приводные ремни" весьма эффективны для получения работающих решений в ситуациях, когда другие стандартные средства (например, VBScript и SendKeys) оказываются бессильны. По замыслу AutoIt предполагался быть средством "тиражирования конфигураций" ПК. Но с момента создания третьей версии его возможности могут быть использованы для реализации "кухни" автоматизации - написания сценариев решения различных задач, в том числе и для администрирования системы. AutoIt умеет:'&@CRLF& 'Симулировать нажатия комбинаций клавиатуры (поддерживается основная масса раскладок клавиатуры)'&@CRLf&'Симулировать перемещения указателя мыши и нажатия на ее кнопки'&@CRLF&'Перемещать, менять размер и управлять параметрами отображения окон'&@CRLF&'Непосредственно взаимодействовать с "управляющими элементами" (controls) окна (получать/менять надпись, перемещать, отключать, и т.п. действия)'&@CRLF&'Работать с буфером обмена для пересылки его текстового содержания'&@CRLF&'Читать, менять и создавать ключи и значения реестра'
$Response = _INetSmtpMail ($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body)
$err = @error
If $Response = 1 Then
MsgBox(0, "Success!", "Mail sent")
Else
MsgBox(0, "Error!", "Mail failed with error code " & $err)
EndIf
Отсылал 2 раза и открывал двумя разными почтовыми программами: The Bat и Pop Peeper, в обоих случаях письмо получено читабельно и в кирилице. (Тему и имя пользователя нужно писать в транслите либо на англ...)
|
-------
Не в кількості знань полягає освіта, а в повному розумінні і вмілому використанні того, що знаєш.
Отправлено: 18:40, 18-11-2009
| #7
|