Скачать: 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 вся ветка

Скачать: CL | DM;



Память: 0.45 MB
Время: 0.006 c