Hallo zusammen,
ich verwende
INDY 10 und speichere mit einem Tool alle eingehenden Emailanhänge in der Struktur EMAILADRESSEdesABSENDERS DATEINAMENANHANG
Ab und zu, wenn ich Emails aus der eigenen Domäne bekomme, so wird die EMAILADRESSEdesABSENDERS nicht vollständig ermittelt. Beispiel:
a)
jan.mueller@test.de sendet Word.DOC
b) mein Programm speichert den Anhang under jan.mueller Word.DOC oder noch schlimmer unter mueller Word.DOC
c) erwartet hätte ich
jan.mueller@test.de Word.DOC
Wie kann ich es implementiere, dass die Emailadresse immer vollständig ermittelt wird?
Ich habe bis dato diese verwendet:
Delphi-Quellcode:
dateiname:='d:\_Eingang\'+Msg.From.Address+' '+TIdAttachmentFile(Msg.MessageParts.Items[intIndex]).Filename;
if not fileexists(dateiname) then TIdAttachmentMemory(Msg.MessageParts.Items[intIndex]).SaveToFile(dateiname);
mfg
Kef