INetSmtpClient.Send

Синтаксис

Send(Message: INetMailMessage);

Параметры

Message. Электронное почтовое сообщение, которое необходимо отправить.

Описание

Метод Send осуществляет отправку сообщения электронной почты.

Комментарии

Отправка сообщения осуществляется на почтовый сервер, указанный при инициализации в конструкторе CurlSmtpClient.CreateWithHost или CurlSmtpClient.CreateWithHostAndPort, либо на сервер, заданный в свойстве INetSmtpClient.Host. Отправка осуществляется с учётом параметров, заданных в свойствах INetSmtpClient.Port и INetSmtpClient.Timeout.

Пример

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

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

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

См. также:

INetSmtpClient