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

Вниз

Прием-отправка файла   Найти похожие ветки 

 
Andrey V. ©   (2003-11-25 13:30) [0]

Возникла необходимость в программке , которая брала бы из почты файл и ложила его в заданный каталог и ,желательно, обратные действия. Научите, кто знает.


 
Anatoly Podgoretsky ©   (2003-11-25 13:32) [1]

The Bat! Но только в одну сторону.


 
REA ©   (2003-11-25 15:04) [2]

См. MAPI, SMTP, POP3 и комопненты для всего этого.


 
AleksandrKu   (2003-11-25 15:13) [3]

Это конечно неидеал но работает
пример отправки
NMSMTP1.PostMessage.Body.clear;
NMSMTP1.PostMessage.Body.add("-601-");
NMSMTP1.PostMessage.ToAddress.Clear;
NMSMTP1.PostMessage.Attachments.clear;
NMSMTP1.PostMessage.ToAddress.add("601@obnb.ru");
NMSMTP1.PostMessage.Attachments.Add(fi+dop+".601");
if not(NMSMTP1.Connected) then NMSMTP1.Connect;
NMSMTP1.SendMail;
NMSMTP1.Disconnect;
MessageDlg("Файл отправлен",mtConfirmation, [mbYes], 0);
Пример получения
{получение почты}

if not(NMPOP31.Connected) then NMPOP31.Connect;
i:=NMPOP31.MailCount;
while i>0 do
begin
if not(NMPOP31.Connected) then NMPOP31.Connect;
NMPOP31.GetMailMessage(1);
filname:=NMPOP31.MailMessage.Attachments.Strings[0];

{ NMPOP31.MailMessage.Attachments.SaveToFile(filname);}
NMPOP31.DeleteMailMessage(1);
коечто настраивается в инспекторе обектов



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

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

Наверх




Память: 0.47 MB
Время: 0.012 c
1-93447
Незнайка
2004-01-16 12:49
2004.01.29
Как в дельфи перевести:


9-93317
inc-viz
2003-07-13 14:15
2004.01.29
Delphix - вывод спрайтов


7-93719
Владимир Березин
2003-11-10 21:49
2004.01.29
Призраки в корзине


3-93333
Brain Force
2004-01-04 14:00
2004.01.29
Помогите с DBGrid


4-93740
brn
2003-11-22 17:27
2004.01.29
Получение класса окна