Einzelnen Beitrag anzeigen

b1zZ

Registriert seit: 8. Aug 2005
Ort: Wischhafen
52 Beiträge
 
Delphi 2009 Enterprise
 
#5

Re: EMAIL -> SMTP -> Anhang mit verschicken ?

  Alt 25. Apr 2007, 08:59
Wie gesagt funktioniert der Code mit Indy 9 problemlos. Hab leider die Indy 10 nicht hier, werde es aber mal heute
Abend mal zu Hause probieren.

aber habe eben noch einen Code gefunden der mit Indy 10 wohl funktionieren soll
Delphi-Quellcode:

var anhang:=TIdAttachmentFile;
    Pfad, Dateiname: String;
...

pfad:= 'c:\test\';
Dateiname:= 'Test.txt';

IsEncoded:=true; // Kann leider nicht sagen was IsEncoded ist aber vielleicht eine Property

anhang:=TIdAttachmentFile.Create(IdMessage1.MessageParts );

anhang.StoredPathName:=pfad+dateiname;

anhang.FileName:=Dateiname;

anhang.OpenLoadStream;

anhang.CloseLoadStream;
  Mit Zitat antworten Zitat