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

Вниз

Разница между TIdAttachment и TIdAttachmentFile   Найти похожие ветки 

 
mefodiy   (2011-06-15 11:02) [0]

В Дельфи 7 был и нормально работал код
lSMTP := TIdSMTP.Create(nil);
lMsg := TIdMessage.Create(lSMTP);
try
 with lMsg do
 begin
    Date                      := Now;
    Subject                   := <Subject>;
    Recipients.EMailAddresses := <Адрес>;                                
    From.Text                 := <Адрес>
    Sender.Text               := <Адрес>
    ContentType               := "text/html";
    Priority                  := mpHighest;
    Body.Add("Text");
 end;
 TIdAttachment.Create(LMsg.MessageParts,<адрес файла>);
 with lSMTP do
 begin
    AuthType := satDefault;
    Host     := "smtp.mail.ru";
    Username := <user name>        
    Password := <password>
    Connect;
    try
      Send(lMsg);
    finally
       Disconnect;
     end;
  end;
except
   ShowMessage("An error occurred while sending the file!");
end;
 FreeAndNil(lMsg);
 FreeAndNil(lSMTP);
end;
В Дельфи 2010 при замене TIdAttachment на TIdAttachmentFile с теми же параметрами почему то содержимое прикрепляемого файла (у меня  это excel файл) включается в ту часть, где содержится собственно само письмо (body),  вместо того, чтобы прикрепится как отдельный файл.
Где ошибка?
Спасибо.


 
Игорь Шевченко ©   (2011-06-15 13:04) [1]

IdMessage.ContentType := "multipart/mixed"

?


 
mefodiy   (2011-06-15 13:12) [2]

Да, спасибо.



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

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

Наверх




Память: 0.47 MB
Время: 0.009 c
1-1267450439
apic
2010-03-01 16:33
2011.10.02
Как при компиляции автоматически поместить исходный код


15-1307593117
Sergey
2011-06-09 08:18
2011.10.02
перезагрузка адсл модема


1-1267656003
FalseMaster
2010-03-04 01:40
2011.10.02
Не работает Неlp Insight


15-1307283813
Kerk
2011-06-05 18:23
2011.10.02
Какие технические блоги вы читаете?


2-1307937881
Gu
2011-06-13 08:04
2011.10.02
application.handle из dll