Текущий архив: 2006.04.30;
Скачать: CL | DM;

Вниз

отсылка на e-mail   Найти похожие ветки 

← →
Dest81 ©   (2006-04-13 14:55) [0]

Как в делфе отослать файл на мыло?

---

← →
Yegorchic ©   (2006-04-13 15:49) [1]

Вообще-то, надо смотреть FAQ, или поиском по форуму пользоваться, т.к:

http://www.delphimaster.ru/cgi-bin/forum.pl?n=18&search=mail
а там есть
http://delphimaster.net/view/2-1144254037/

Вот.

---

← →
Dest81 ©   (2006-04-13 15:51) [2]

спасибо! Другой раз так и сделаю!

---

← →
dest81 ©   (2006-04-14 13:57) [3]

var
M: TIdMessage;
begin
M := TIdMessage.Create(Form1);
M.Body.Add("Текст сообщения");
M.From.Text := ""Имя" <name@mail.ru>"; //отправитель
M.Recipients.Add;
M.Recipients.Items[0].Text := ""Тест" <name2@mail.ru>"; //Получатель
M.Subject := "Проверка..."; //Тема письма
IdSMTP1.AuthenticationType:=atLogin;
IdSMTP1.Host := "smtp.mail.ru";  // SMTP сервер
IdSMTP1.Username := "name";  // Имя пользователя
IdSMTP1.Password := "123456789"; // пароль
IdSMTP1.Connect;
if IdSMTP1.Connected then
  IdSMTP1.Send(M);
IdSMTP1.Disconnect;
end;

Сообщения идут а как отправить файл?

---

Страницы: 1 вся ветка

Текущий архив: 2006.04.30;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.043 c