Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2007.03.18;
Скачать: CL | DM;

Вниз

Письма с вложением   Найти похожие ветки 

 
Прохожев М   (2006-10-05 16:45) [0]

Здравствуйте !!!
Подскажите пожалуйста какие компоненты нужно использовать, чтобы получить письма с вложением и сохранить прикрепленные файлы в определенную папку. (POP3)


 
Сергей М. ©   (2006-10-05 16:45) [1]

TIdPOP3


 
Германн ©   (2006-10-05 16:53) [2]

TPop3Cli


 
AlexWlad ©   (2006-10-05 19:52) [3]

Simple MAPI (MAPIReadMail etc.)


 
Прохожев М   (2006-10-06 16:12) [4]

Memo2.Lines.Add("           Адрес: "+DecodeStr(IdMessage1.From.Address));
Memo2.Lines.Add("           Имя: "+DecodeStr(IdMessage1.From.Name));
Memo2.Lines.Add("           Тема: "+DecodeStr(IdMessage1.Subject));

Подскажите как сохранить в папку вложение письма ? Очень надо. Заранее спасибо.


 
DBE   (2006-10-06 18:57) [5]

form1.Smtp.AuthenticationType:=atLogin; // atNone
form1.Smtp.Username:=user;
form1.Smtp.Password:=pass;
//
form1.MailMessage.From.Name:=fromname;
form1.MailMessage.Subject:=subject; // тема
form1.MailMessage.From.Address:=from; // адрес отправителя
form1.MailMessage.Recipients.EMailAddresses:=recip; // получатель + копия
form1.MailMessage.Body.Text:=form1.Memo2.Text; // текст сообщения
if FileExists(file)
then TIdAttachment.Create(form1.MailMessage.MessageParts,file);


 
DBE   (2006-10-06 19:00) [6]

вот так я в свое время делал....


 
DBE   (2006-10-06 19:00) [7]

ой... это отправка с вложением...
щас поищу где сохранение вложения...



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

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

Наверх




Память: 0.48 MB
Время: 0.04 c
6-1159949661
Nickla
2006-10-04 12:14
2007.03.18
VPN соединение в DELPHI


2-1172510704
ezorcist
2007-02-26 20:25
2007.03.18
Незавершающееся консольное приложение.


15-1171879001
Конечно не скажу ;)
2007-02-19 12:56
2007.03.18
Теория относительности, новые подходы, новые идеи.


8-1143985906
race1
2006-04-02 17:51
2007.03.18
WAV + WAV


15-1172095241
ProgRAMmer Dimonych
2007-02-22 01:00
2007.03.18
Извините за наглость, но