![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Отправка сообщений на почтовый сервер
=Teddy= © (2007-02-01 15:09:00)Не подскажите, как отправить сообщение на почтовый сервер типа mail.ru и т.д.
Сергей М. (2007-02-01 16:11:00) [1]
> =Teddy= (01.02.07 15:23) [2]
> Я это понимаю,мне хочется сделать с помощью INDY
И мы тут все как один, судя по твоему вопросу, разумеется прямо-таки с разбегу понимаем, что ты то самое "это" хочешь сделать "с помощью INDY"
Не пора ли репу свою почесать насчет постановки вопроса, а ?
Neket (2007-02-01 15:35:00) [2]А вообще читай здесь
http://www.delphimaster.ru/articles/smtp/index.html
Neket (2007-02-01 15:32:00) [3]
var
Msg: TIdMessage;
....................
form1.IdMessage1.Subject:=''; //Тема сообщения
form1.IdMessage1.Recipients.EMailAddresses:=mas[u];// Массив адресов для рассылки
Form1.IdMessage1.From.Address:='';// адрес отправителя
form1.IdMessage1.Body.Text:=text; //Текст сообщения
form1.IdMessage1.Date:=StrToDate('01.12.2004'); //Дата отправки
form1.IdSMTP1.Port:=25;
form1.IdSMTP1.Host := '';// Здесь адрес почтового сервера
form1.IdSMTP1.AuthenticationType:=atLogin;
form1.IdSMTP1.Username:='';// то чо идет перед @mail.ru
form1.IdSMTP1.Password:='';// Здесь пароль на ящик с которого ты типа будеш отправлять
form1.IdSMTP1.Connect(1000);
if form1.IdSMTP1.Connected=True then
form1.IdSMTP1.Send(form1.IdMessage1)
else showmessage('HerVam');
form1.IdSMTP1.Disconnect;
Помоему как-то так......
=Teddy= (2007-02-01 15:23:00) [4]Я это понимаю,мне хочется сделать с помощью INDY,а вот как надо я не знаю!
Сергей М. (2007-02-01 15:10:00) [5]с помощью протокола smtp