urrya
Новичок
- Сообщения
- 159
- Репутация
- 1
Всем привет.
Сделал окошко с полем для ввода и двумя кнопками "отправить" и "отмена",
теперь надо прикрутить к этому оконцу вот это:
да вот только не работает это чудо современное у меня :blink:
при запуске выдаёт ошибку:
---------------------------
Error!
---------------------------
Mail failed with error code 4
---------------------------
ОК
---------------------------
@ ERROR = 4 - не удается создать сокет :'(
пожалуйста, прошу помощи у вас гос-да форумчане.
Сделал окошко с полем для ввода и двумя кнопками "отправить" и "отмена",
теперь надо прикрутить к этому оконцу вот это:
Код:
#include <INet.au3>
$s_SmtpServer = "imap.yandex.ru" ; SMTP-сервер электронной почты
$s_FromName = "Oleg" ; имя отправителя
$s_FromAddress = "[email protected]" ; адрес отправителя
$s_ToAddress = "[email protected]" ; адрес получателя
$s_Subject = "aaaaaaa UDF" ; тема письма
$s_helo = @ComputerName
$s_first = @CRLF
;Dim $s_Body[2]
$s_Body = "Testing the new email udf" ;текст письма
;$s_Body[1] = "Second Line"
$Response = _INetSmtpMail ($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $s_Body, $s_helo, $s_first)
$err = @error
If $Response = 1 Then
MsgBox(0, "Success!", "Mail sent")
Else
MsgBox(0, "Error!", "Mail failed with error code " & $err)
EndIf
да вот только не работает это чудо современное у меня :blink:
при запуске выдаёт ошибку:
---------------------------
Error!
---------------------------
Mail failed with error code 4
---------------------------
ОК
---------------------------
@ ERROR = 4 - не удается создать сокет :'(
пожалуйста, прошу помощи у вас гос-да форумчане.