Форум: "Сети";
Текущий архив: 2004.01.29;
Скачать: [xml.tar.bz2];
ВнизПрием-отправка файла Найти похожие ветки
← →
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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.011 c