Einzelnen Beitrag anzeigen

HolgerCW

Registriert seit: 28. Nov 2006
Ort: Marl
1.207 Beiträge
 
Delphi XE7 Enterprise
 
#1

HTML Code mit Anhang per Indy SMTP versenden

  Alt 30. Apr 2015, 11:01
Delphi-Version: 2006
Hallo zusammen,

ich möchte eine E-Mail im HTML - Format versenden. Das klappt auch gut.

Hänge ich dort nun aber einen Anhang (PDF) mit dran bekommt die E-Mail sowas dabei:

This is a multi-part message in MIME format --EwlBb8h15wn8FEk4IkHmI4wMrOD=_hogbs Content-Type: text/plain Content-Transfer-Encoding: 8bit

Dann mein HTML-Text und danach ganz viel, sowas:

--a=_tI1HSFsDQbEk1H6yVS1vqSeZJbF2FYM Content-Type: image/jpg; name="Brief_VU.pdf" Content-Transfer-Encoding: base64 Content-Disposition: attachment; filename="Brief_VU.pdf" Content-ID: JVBERi0xLjMNCiXi48/TDQoNCjEgMCBvYmoNCjw8DQovVHlwZSAvQ2F0YWxvZw0KL091d GxpbmVz IDIgMCBSDQovUGFnZXMgMyAwIFINCj4 ......

Mein Code zum einfügen des Anhangs:

Delphi-Quellcode:
...

  mymessage.ClearBody;
  mymessage.Body.Add(strmessage);
  mymessage.Subject := Subject;
  if HTML = TRUE then mymessage.ContentType := 'text/html';

  myAttach := TIdAttachmentfile.Create(mymessage.MessageParts, Anhang);
  myAttach.DisplayName := strAttachment;
 
  IdSMTP.Send(mymessage);
  IdSMTP.Disconnect;

...
Was muss ich tuen ?

Gruss

Holger
  Mit Zitat antworten Zitat