SendMail()

Синтаксис

Result = SendMail(#Mail , Smtp$ [, Port [, Flags [, User$ , Password$]]])

Описание

Отправляет почтовое сообщение #Mail.

Параметры

#Mail	Номер, идентифицирующий отправляемое почтовое сообщение.
Smtp$	Адрес почтового сервера используемого для отправки почтового сообщения.
Port (дополн.)	Порт почтового сервера. По умолчанию используется порт 25.
Flags (дополн.)	Этот параметр может быть комбинацией следующих значение (с помощью оператора '|'): #PB_Mail_Asynchronous: Отправить почту в фоновом режиме. Функция MailProgress() может использоваться для отслеживания прогресса. #PB_Mail_UseSSL : Использовать TLS/SSL для отправки почты (сервер должен поддерживать этот протокол).
User$, Password$ (дополнительный)	Пользователь и пароль, используемые для аутентификации SMTP, если это требует сервер.

Возвращаемое значение

Возвращает не нулевое значение, если почтовое сообщение было отправлено успешно, в противном случае 0.

Пример: Простой SMTP

InitNetwork()

; Примечание: измените адрес и smtp на рабочий пример
;
If CreateMail(0, "test@youraddress.com", "Hello")
    AddMailRecipient(0, "youraddress@youraddress.com", #PB_Mail_To)

    Debug SendMail(0, "smtp.yourfavoritesmtp.com")
EndIf

Пример: Используя Gmail (TLS)

InitNetwork()

; Обязательно используйте правильный логин и правильный пароль
;
Login$ = "yourlogin"
If CreateMail(0, Login$ + "@gmail.com", "Hello")
    AddMailRecipient(0, "youraddress@youraddress.com", #PB_Mail_To)

    Debug SendMail(0, "smtp.gmail.com", 465, #PB_Mail_UseSSL, Login$, "password")
EndIf

См. также

CreateMail(), MailProgress()

Поддерживаемые OS

Все