Форум АНТИЧАТ

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Как осуществить отправку писем из memo1 (https://forum.antichat.xyz/showthread.php?t=71784)

/Boom\ 28.05.2008 10:40
Как осуществить отправку писем из memo1
 
Idsmtp1.Host:=Edit5.text;
idsmtp1.Port:=25;
idsmtp1.Username:=edit6.text;
idsmtp1.Password:=edit7.text;
IdMessage1.From.Address := edit2.text;
IdMessage1.Recipients.Add.Address := edit4.text;
IdMessage1.Subject := edit3.text;
idmessage1.Body.Text:=memo3.Text;
idsmtp1.Connect;
idsmtp1.Send(idmessage1);

У меня вот такой код,одно сообщение отпровляется добовляю два емайла вылазиет ошибка.
Подскожите что нужно исправить или дописать

slesh 28.05.2008 15:55
Для начала опиши что за ошибка

/Boom\ 28.05.2008 17:42
Error sokced

0verbreaK 28.05.2008 19:15
Цитата:
Сообщение от /Boom\
Idsmtp1.Host:=Edit5.text;
idsmtp1.Port:=25;
idsmtp1.Username:=edit6.text;
idsmtp1.Password:=edit7.text;
IdMessage1.From.Address := edit2.text;
IdMessage1.Recipients.Add.Address := edit4.text;
IdMessage1.Subject := edit3.text;
idmessage1.Body.Text:=memo3.Text;
idsmtp1.Connect;
idsmtp1.Send(idmessage1);

У меня вот такой код,одно сообщение отпровляется добовляю два емайла вылазиет ошибка.
Подскожите что нужно исправить или дописать
Может задержку сделать. Sleep(2000);

/Boom\ 28.05.2008 20:39
Цитата:
Idsmtp1.Host:=Edit5.text;
idsmtp1.Port:=25;
idsmtp1.Username:=edit6.text;
idsmtp1.Password:=edit7.text;
IdMessage1.From.Address := edit2.text;
IdMessage1.Recipients.Add.Address := memo2.text;
IdMessage1.Subject := edit3.text;
idmessage1.Body.Text:=memo3.Text;
idsmtp1.Connect;
idsmtp1.Send(idmessage1);
вернее спам лист берется из memo2

/Boom\ 03.06.2008 10:07
тему можно закрыть уже сам разобрался.


Время: 03:19