INetSmtpClient.EnableSsl

Синтаксис Fore

EnableSsl: Boolean;

Описание

Свойство EnableSsl определяет, требуется ли использование SSL-шифрования для отправки сообщений через внешние почтовые серверы.

Комментарии

Для определения порта, через который будет осуществляться отправка сообщений, используйте свойство INetSmtpClient.Port.

Допустимые значения:

• True. Используется SSL-шифрование;

• False. Не используется SSL-шифрование.

Пример Fore

Для выполнения примера добавьте ссылку на системную сборку «Net».

Sub UserProc;
Var
    From_, To_: INetMailAddress;
    Message: INetMailMessage;
    Client: INetSmtpClient;
    Credential: INetNetworkCredential;
Begin
    From_ := New NetMailAddress.Create("ivanov@server.ru");
    To_ := New NetMailAddress.Create("petrov@mail.ru");
    Message := New NetMailMessage.CreateWithFromAndTo(From_, To_);
    Message.Subject := "Тестовое письмо";
    Message.Body := "Текст письма";
    Client := New NetSmtpClient.CreateWithHost("example.server.ru");
    Credential := New NetNetworkCredential.Create("user", "password", "work");
    Client.ThisHostCredentials("") := Credential;
    Client.EnableSsl := True;
    Client.Send(Message);
End Sub UserProc;

Указанная процедура позволяет отправить сообщение электронной почты через указанный почтовый сервер. Для авторизации на почтовом сервере будут использоваться указанные учетные данные.

См. также:

INetSmtpClient