Вниз
Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.011 c
1-93471
ГС ТОФ
2004-01-18 12:00
2004.01.29
Работа со слоями


1-93483
baataars
2004-01-15 13:58
2004.01.29
OpenDialog не встает на DefaultExt если есть фильтр


3-93348
raptorus
2004-01-04 10:10
2004.01.29
Здравствуйте, Мастера. Подскажите как перерисовывавать ячейки


1-93549
LeWorm
2004-01-17 22:28
2004.01.29
Запуск EXE или COM


1-93456
Lkan
2004-01-16 08:03
2004.01.29
Хеш




   Наверх