Форум: "Начинающим";
Текущий архив: 2007.02.18;
Скачать: [xml.tar.bz2];
ВнизОтправка сообщений на почтовый сервер Найти похожие ветки
← →
=Teddy= (2007-02-01 15:09) [0]Не подскажите, как отправить сообщение на почтовый сервер типа mail.ru и т.д.
← →
Сергей М. © (2007-02-01 15:10) [1]с помощью протокола smtp
← →
=Teddy= (2007-02-01 15:23) [2]Я это понимаю,мне хочется сделать с помощью INDY,а вот как надо я не знаю!
← →
Neket (2007-02-01 15:32) [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;
Помоему как-то так......
← →
Neket (2007-02-01 15:35) [4]А вообще читай здесь
http://www.delphimaster.ru/articles/smtp/index.html
← →
Сергей М. © (2007-02-01 16:11) [5]
> =Teddy= (01.02.07 15:23) [2]
> Я это понимаю,мне хочется сделать с помощью INDY
И мы тут все как один, судя по твоему вопросу, разумеется прямо-таки с разбегу понимаем, что ты то самое "это" хочешь сделать "с помощью INDY"
Не пора ли репу свою почесать насчет постановки вопроса, а ?
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.02.18;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.038 c