Главная страница
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.018 c
1-93504
Кен
2004-01-16 02:34
2004.01.29
Чем лучше запаковать программу, чтобы враги не распаковали ?


7-93714
Morgan128
2003-11-12 01:18
2004.01.29
Распознание текста


14-93632
Goida
2004-01-08 18:27
2004.01.29
Глюки


9-93320
Vitas2
2003-07-16 09:46
2004.01.29
glBlendFunc


3-93383
Silver_
2003-12-30 16:20
2004.01.29
Post После Insert запись убегает в конец. Как на месте оставить