Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Netzwerke (https://www.delphipraxis.net/14-netzwerke/)
-   -   Mailclient Indy Attachment versenden (https://www.delphipraxis.net/183408-mailclient-indy-attachment-versenden.html)

LaPeter 7. Jan 2015 17:21

Mailclient Indy Attachment versenden
 
Hallo erst mal ...
Ich benutze Indy9 zum Versenden von emails. Mit Attachments habe ich folgendes Problem.

ich lade eine Fileliste in eine Stringliste

Delphi-Quellcode:
...
ListAttach.Add(PFLog + sr.name);
...
die Liste ist okay

mit

Delphi-Quellcode:
For i := 0 to ListAttach.Count -1 do
    begin
      TIdAttachment.Create(EMail.MessageParts,ListAttach[i]);
    end;
lade ich diese in die Messageparts.

das versenden der mail schlägt aber fehl.(ohne Attachments funzts)

lade ich die Attachments direkt wie z.B.

Delphi-Quellcode:
TIdAttachment.Create(EMail.MessageParts,'D:\115_PlayList.log');
TIdAttachment.Create(EMail.MessageParts,'D:\116_PlayList.log');
TIdAttachment.Create(EMail.MessageParts,'D:\117_PlayList.log');
funtioniert das Versenden!

Für eine Idee wäre ich Euch sehr dankbar, bin langsam am Ende mit meinem Lathein:?

Danke schon mal

Peter

Gege 7. Jan 2015 22:46

AW: Mailclient Indy Attachment versenden
 
hallo ..

und wenn du es mit einen zwischhen String machst ? geht es dann ?

also
Code:
For i := 0 to ListAttach.Count -1 do
begin
Tempstring:=ListAttach[i];
TIdAttachment.Create(EMail.MessageParts,Tempstring);
end;
kommt auf die Terminierung des Strings/Stringlist evtl an denk ich ?! evtl lieg ich ja auch falsch .. :)

LaPeter 7. Jan 2015 23:37

AW: Mailclient Indy Attachment versenden
 
... Hab ich auch schon probiert, funzt leider auch nicht.
Der Witz ist, ich hab mir den Inhalt der messageparts angschaut, in beiden Varianten, und
Es sieht absolut identisch aus ...
Ich habs auch mal mit folgendem code versucht, der auch funktionierte ...

Delphi-Quellcode:
If opendialog.execute then
  For i := 0 to opendialog.files.count -1 do
      TIdAttachment.Create(EMail.MessageParts, opendialog.files[i];
Die Stringterminierung werde ich mir mal noch genauer anschauen, vielleicht liegt es daran!

Danke für den Tip
Peter

pelzig 8. Jan 2015 01:34

AW: Mailclient Indy Attachment versenden
 
Hast Du mal versucht, ein Trim auf den Tempstring von #2 loszulassen?

MfG

LaPeter 8. Jan 2015 06:43

AW: Mailclient Indy Attachment versenden
 
Yes ...

noisy_master 8. Jan 2015 08:17

AW: Mailclient Indy Attachment versenden
 
Moin,

habe gerade gesehen, dass du scheinbar mit findfirst/Next deine Dateien zusammensuchst.
Bist du dir sicher, dass keine Directories und auch . und .. nicht in deinen Suchergebnissen sind?

LaPeter 8. Jan 2015 08:40

AW: Mailclient Indy Attachment versenden
 
auch moin ;)

Problem gelöst :-D !
Danke für deinen Hinweis. Dies war zwar nicht das Problem, hat mich aber auf
die richtige Spur gebracht.
Im Pfad zum Anhang fehlte der letzte Backslash vor dem Dateinamen !
Mein Fehler, arbeite eigentlich immer mit IncludeTrailingPathDelimiter,
an dieser Stelle hab ichs aber verbumfidelt!

Danke Euch allen für die Hilfe

Gruß aus Leipzig
Peter


Alle Zeitangaben in WEZ +2. Es ist jetzt 11:19 Uhr.

Powered by vBulletin® Copyright ©2000 - 2021, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2021 by Daniel R. Wolf