Отправка сообщений на e-mail

@OvodRu · Регистрация: 20.04.2015

Author24 — интернет-сервис помощи студентам

Здравствуйте! Мне необходимо отправить сообщение на почту. Нашел пример с компонентами IdSMTP1 и IdMessage1.
Пример довольно короткий, но судя по комментариям у многих работает. Однако у меня программа зависает. Порт и хост я проверил на телефоне, они верны.

C++

 
 IdSMTP1->Host = "smtp.mail.ru"; // Адрес почтового сервера
 IdSMTP1->Port = 465; //Используемый порт
 IdSMTP1->UserId = "vladislavkr@mail.ru"; // Пишем  логин от почты
 IdSMTP1->Password = "пароль"; // и пароль к нему
 
 
 IdMessage1->From->Text = "vladislavkr@mail.ru";
 IdMessage1->Recipients->EMailAddresses = "aleksbelousoff@bk.ru";
 IdMessage1->Subject = "Прост";
 IdMessage1->Body->Text = "Проверка";
 IdSMTP1->Connect();
 IdSMTP1->Send(IdMessage1);
 IdSMTP1->Disconnect();

@~~yasno~~ · 31.01.2016, 11:47

OvodRu, видимо пользуетесь 6ым билдером? там данные компоненты уже устарели... и данный пример уже не работает, вернее не со всеми почтовыми серверами.

@OvodRu · 31.01.2016, 14:09 **[ТС]**

Ну да, 6-ым. Это печально. А какой метод теперь использовать?

@~~yasno~~ · 31.01.2016, 17:21

OvodRu, используйте более новую среду, что я могу посоветовать самое простое, или попытаться обновить компоненты...

@volvo · 04.02.2016, 09:55

Сообщение от yasno

там данные компоненты уже устарели

Эти компоеннты прекрасно работают и в XE-ветке Билдера, включая Seattle, ни разу они не устарели. Просто нужно учитывать хитрость mail.ru (с ним ВСЕГДА проблемы), и то, что этот сервер работает по https (а значит, нужен SSL и, возможно, 587-ой порт, а не 465-ый). Только что это разжевывалось: Виснет IdSMTP1->Connect()

@~~yasno~~ · 04.02.2016, 10:43

volvo, про с++ builder 6 идет речь, а не про xe ветку...

@OvodRu · 22.02.2016, 09:32 **[ТС]**

Компоненты Indy10 поставил. SMTP подключается, но виснет во время отправки...
Добавил компонент IdSSLIOHandlerSocketOpenSSL.

C++

 SMTP->Host = "smtp.mail.ru"; // Адрес почтового сервера
 SMTP->Port = 587; //Используемый порт
 SMTP->Username = "vladislav97kr@mail.ru"; // Пишем  логин от почты
 SMTP->Password = "пароль";
 
 SSLOpen->DefaultPort = 0;
 SSLOpen->SSLOptions->Method = sslvSSLv23;
 SSLOpen->SSLOptions->Mode = sslmUnassigned;
 
 SMTP->IOHandler = SSLOpen;
 
 IdMessage1->Clear();
 IdMessage1->From->Address = "vladislav97kr@mail.ru";
 IdMessage1->Recipients->EMailAddresses = "sekret123ok@mail.ru";
 IdMessage1->Subject = "Прост";
 IdMessage1->Body->Text = "Проверка";
 
  //SMTP->ConnectTimeout = 30000;
  SMTP->Connect();
  ShowMessage("Соединился");
 
  if (SMTP->Connected())
  {
    ShowMessage("Перед отправкой!");
    SMTP->Send(IdMessage1);//виснет тут
    ShowMessage("Может и отправил");
  }//if
  else  { ShowMessage("Подключиться не удалось"); }
 
  SMTP->Disconnect();

Добавлено через 24 минуты
Еще иногда выдает ошибку "Socket Error #10054. Connect reset be peer." ее можно обойти отключив антивирусник. Но это не удобно.

@~~yasno~~ Заблокирован
	31.01.2016, 11:47	2
	OvodRu, видимо пользуетесь 6ым билдером? там данные компоненты уже устарели... и данный пример уже не работает, вернее не со всеми почтовыми серверами. 0

@OvodRu 0 / 0 / 0 Регистрация: 20.04.2015 Сообщений: 18
	31.01.2016, 14:09 [ТС]	3
	Ну да, 6-ым. Это печально. А какой метод теперь использовать? 0

@~~yasno~~ Заблокирован
	31.01.2016, 17:21	4
	OvodRu, используйте более новую среду, что я могу посоветовать самое простое, или попытаться обновить компоненты... 0

@volvo Супер-модератор 32989 / 21295 / 8180 Регистрация: 22.10.2011 Сообщений: 36,586 Записей в блоге: 8
	04.02.2016, 09:55	5
	Сообщение от yasno там данные компоненты уже устарели Эти компоеннты прекрасно работают и в XE-ветке Билдера, включая Seattle, ни разу они не устарели. Просто нужно учитывать хитрость mail.ru (с ним ВСЕГДА проблемы), и то, что этот сервер работает по https (а значит, нужен SSL и, возможно, 587-ой порт, а не 465-ый). Только что это разжевывалось: Виснет IdSMTP1->Connect() 0

@~~yasno~~ Заблокирован
	04.02.2016, 10:43	6
	volvo, про с++ builder 6 идет речь, а не про xe ветку... 0

	22.02.2016, 09:32