Главная страница
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.028 c
7-93720
ponyol
2003-11-09 07:39
2004.01.29
Delphi и сканер.


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


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


3-93405
dtm
2003-12-29 18:56
2004.01.29
хранение данных в виде XML в СУБД FireBird


1-93574
mixa
2004-01-17 04:43
2004.01.29
Как изменить дату на компьютере?