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

Форум АНТИЧАТ (https://forum.antichat.xyz/index.php)
-   С/С++, C#, Delphi, .NET, Asm (https://forum.antichat.xyz/forumdisplay.php?f=24)
-   -   Отправка почты SMTP через Делфи [Как?] (https://forum.antichat.xyz/showthread.php?t=113529)

НTL 29.03.2009 12:52
Отправка почты SMTP через Делфи [Как?]
 
Я мало шарю в делпи, мне нужно сделать прогу в которой при нажатии кнопки "Button1" значение полей с edit1-edit4 отправились на почту.

С меня ++++++

diznt 29.03.2009 13:21
http://programmersforum.ru/showthread.php?t=17625
http://forum.xakep.ru/m_1206365/tm.htm
http://www.programmersclub.ru/alar-pochovik/

пробуй и вообще гугл надо юзать там полно этого всего
в случае если что то из примеров гугла не понятно - спрашивай
думаю сможешь разобраться

_nic 29.03.2009 13:24
Цитата:
Делпи
А что это :confused:

mad_xakep 29.03.2009 13:28
Цитата:
Сообщение от _nic
А что это :confused:
делфи

НTL 29.03.2009 13:45
Сделал по этой инструкции: http://svdpro.info/page.php?id=32
Еще раз повторю что в делфи я мало шарю

Исходник: http://dump.ru/file/2315639
Исправте плиз ошибки, я даже не знаю куда надо поставить скрипт на отправку

diznt 29.03.2009 14:30
Лучше забить на почту (мое имхо)(ICQ клиент вот то что надо для крутых целей :D)
Если не дождешься ответа то спроси тут

programmersforum.ru (помогут точно)

НTL 29.03.2009 16:56
ICQClient1 на какой вкладке? :)

НTL 29.03.2009 16:59
Все нашол вкладка: Samples

slesh 30.03.2009 09:58
для таких простых целей чтобы нее*атцо отправляй лучше на гейт а там уже разберешся, толи на сервер, толи на мыло.
Потому что таскать с собой акки мыла както ни есть гуд, а юзать почтовые шлюзы - карается закидыванием в спам или вообще пошлет тебя куда подальше изза блека ip или ил-за его динамичности.
в для гейта проще некудо - urldownloadtofile

[K4t] 01.04.2009 08:48
Цитата:
Сообщение от НTL
Я мало шарю в делпи, мне нужно сделать прогу в которой при нажатии кнопки "Button1" значение полей с edit1-edit4 отправились на почту. С меня ++++++
Одно время этим тоже интересовался. Использовал правда, Indy компоненты Delphi 7 (IdSMTP); Приведу как пример код из своей программы © [K4t]

Код:
{ uses ... IdMessage, IdBaseComponent,
  IdComponent, IdTCPConnection, IdTCPClient, IdMessageClient, IdSMTP; }

procedure TForm1.Button1Click(Sender: TObject);
var q:integer;
begin
q:=0;
idSMTP1.host:=Edit1.Text;
idSMTP1.Port:=25;
idSMTP1.Username:=Edit2.Text;
idSMTP1.Password:=Edit3.Text;
 with idMessage1 do
 begin
 From.Text:=Edit4.Text;
 Recipients.EMailAddresses:=Edit5.Text;
 Memo1.Lines.Add('Connecting...');
 Statusbar1.SimpleText:=('Connecting...');
 end;
 idSMTP1.Connect;
 try
 begin
 Form1.Repaint;
 Memo1.Lines.Add('Connected');
 Memo1.Lines.Add('Sending...');
 StatusBar1.SimpleText:='Sending...';
 end;
 while q<strtoint(Edit6.Text) do
 begin
 q:=q+1;
 idMessage1.Subject:=(IntToStr(Random(10000)) + Edit7.Text);
 Memo2.Lines.Delete(2);
 Memo2.Lines.Insert(2,inttostr(random(10000)));
 Sleep(600);
 idSMTP1.Send(idMessage1);
 ProgressBar1.Position:=Round(100*q/strtoint(Edit6.Text));
 Memo1.Lines.Add('Sended: '+inttostr(q));
 Statusbar1.SimpleText:=('In process...');
 end;
 finally;
 idSMTP1.Disconnect;
 Memo1.Lines.Add('Отправлено '+inttostr(q)+' сообщений');
 Form1.Repaint;
 Statusbar1.SimpleText:=('Finished');
 end;
 end; { © [K4t] }
Вот и всё. Думаю разберёшся. Правда я (хе хе) делал флудер, но ты просто убери цикл и q уничтож. Удачи.

arser 16.04.2009 16:01
плз помогите ,мне нужно сделать такую программу ( на делфи)чтобы текст и тема сообщения бралась и компонентов Edit1 и Edit2,а при нажатии на Button сообщение отсылалось на указанный мной адрес

ronald 16.04.2009 16:29
http://delphiexpert.ru/view_lesson.php?id=46
смотри

arser 16.04.2009 16:48
Я имел ввиду чтобы текст и тему письма пользователь вписывал в компоненты Edit1 и Edit2
в Edit1 тему ,а в Edit2 текст

ronald 16.04.2009 17:18
Ну вот и прикрути это к тому коду ;)

arser 16.04.2009 17:22
Цитата:
Сообщение от ronald
Ну вот и прикрути это к тому коду ;)
Он там даже Edit'ы не использует

Pernat1y 16.04.2009 17:59
Цитата:
Сообщение от arser
Он там даже Edit'ы не использует
типа send.message.title:=edit.text; ?
домой приду - гляну как точно было

ronald 16.04.2009 18:23
arser , как ты собрался делать этот проект, если даже в простейших компонентах не разбираешься?

arser 17.04.2009 09:57
Цитата:
Сообщение от ronald
arser , как ты собрался делать этот проект, если даже в простейших компонентах не разбираешься?
Уже сделал!!!магу даже ссылочку дать
И ЕЩЕ СПАСИБО ЗА ПОМОЩЬ!!!

s0l_ir0n 17.04.2009 20:29
Я худею (с) Жорик Вартанов
https://forum.antichat.ru/thread115202.html


Время: 07:25