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

Вниз

Сохраняю файл аттач с помощью TIdPOP3, TIdAttachment   Найти похожие ветки 

 
Layner ©   (2004-03-17 10:06) [0]

А в ответ на диске ничего нет.. Ещё пишет "Invalid argument to date encode"

procedure Tmf.Button3Click(Sender: TObject);
var
pop3:TIdPOP3;
mes:TIdMessage;
Attach:TIdAttachment;
count, i: integer;
begin

pop3:=TIdPOP3.Create(nil);
mes:=TIdMessage.Create(nil);
pop3.Username:="xml@rdu.kirov.ru";

pop3.Password:="u7aS_1bZ";
pop3.Port:=110;
pop3.Host:="192.168.1.1";

if not pop3.Connected then pop3.Connect;
 count:=pop3.CheckMessages;

//ïîëó÷åíèå ïèñåì â öèêëå
for i:=1 to count do
begin
 pop3.Retrieve(1,mes);
 if mes.Subject="xml" then
   begin
   Attach:=TidAttachment.Create(mes.MessageParts,"1.xml");
    if SaveDialog1.Execute then
     Attach.SaveToFile(SaveDialog1.FileName);
   Attach.Free;
   //pop3.Delete(i);
   end;
end;
end;

подскажите, есть пример от INDY, но он ругается на ту же ошибку! Почтовый сервер у нас свой в вн сети. Кол-во писем получаю нормально. Т.е. коннектюсь нормально.


 
Layner ©   (2004-03-17 10:07) [1]

Блин пароль не убрал :( Ладно сетка своя, не страшно :(



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

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

Наверх




Память: 0.46 MB
Время: 0.034 c
3-1082007252
Evgenija
2004-04-15 09:34
2004.04.11
Подсоединение к базе Оракла


1-1080202303
MakNik
2004-03-25 11:11
2004.04.11
Декомпиляция проекта


3-1079080641
Russko
2004-03-12 11:37
2004.04.11
Table is read only


14-1082361946
zzet
2004-04-19 12:05
2004.04.11
Испания выводит войска из Ирака.


1-1082304018
Tack83
2004-04-18 20:00
2004.04.11
Главное меню. Alt-акселераторы.