Utilisation du dernier instantané d'Indy tiburon sur D2010. Un projet très simple comme:Indy IdSMTP et pièces jointes dans Thunderbird
var
stream: TFileStream; (s is TidSMTP and m is TidMessage)
begin
s.Connect;
Stream := TFileStream.Create('c:\Test.zip', fmOpenRead or fmShareExclusive);
try
with TIdAttachmentMemory.Create(m.MessageParts, Stream) do
begin
ContentType := 'application/x-zip-compressed';
Name := ExtractFilePath('C:\'); //'
FileName := 'Test.zip';
end;
finally
FreeAndNil(Stream);
end;
s.Send(m);
s.Disconnect();
end;
Tout fonctionne bien dans Outlook, La chauve-souris !, OE, Yahoo, etc ... mais dans Thunderbird l'attachement n'apparaît pas. En regardant la source du message dans Thunderbird, la pièce jointe est là. La seule différence que je peux trouver entre les messages envoyer par indy et d'autres clients est que les messages Indy ont cet ordre:
Content-Type: multipart/mixed; boundary="Z\=_7oeC98yIhktvxiwiDTVyhv9R9gwkwT1"
MIME-Version: 1.0
alors que tous les autres clients ont l'ordre:
MIME-Version: 1.0
Content-Type: multipart/mixed; boundary="Z\=_7oeC98yIhktvxiwiDTVyhv9R9gwkwT1"
Je ne sais pas si est la source du problème, mais si oui: est-ce un bug sur Thunderbird ou est-ce un problème avec indy qui "malforme" les en-têtes des messages? Cette commande est-elle un problème? Cela compte-t-il de toute façon?
êtes-vous en mesure de mettre le message complet avec des en-têtes quelque part (comme un pastebin)? – glob