Discussion :

[jlderrien]

Bonjour

J'essaye désespérément d'envoyer un mail avec des accents dans le sujet et le corps mais rien à faire. Je souhaite éviter l'html

J'ai bien entendu tester plusieurs solutions mais je dois m'emmêler les pinceaux quelque part !

Voici le bout de code qui envoie le mail. Celui-ci est bien reçu (orange ou gmail) mais les accents ne passent pas

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
 
  idMes.Recipients.Add.Address := 'mon@adresse.mail';
  idMes.Encoding := mePlainText;
  idMes.ContentType := 'plain/text';
  idMes.CharSet := 'ISO-8859-1';
  idMes.Subject := 'test àà';
  idMes.Body.Text := 'test avec des éàè';
  idSMTP.Connect;
  idSMTP.Send(idMes);
  idSMTP.Disconnect;

Auriez-vous la bonne combinaison pour le paramétrage ?

Merci d'avance

[Ph. B.]

Bonjour

J'ai bien entendu tester plusieurs solutions mais je dois m'emmêler les pinceaux quelque part !

En effet...
Voici quelques corrections à apporter au code

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
//...
  idMes.Encoding := meMIME; // mePlainText;
  idMes.ContentType := 'text/plain'; // 'plain/text';
  //...
  // Eventuellement penser à rajouter
  idMes.From.Address := 'emetteur@adresse.mail';
  //...

Cela devrait marcher nettement mieux...
--
Philippe.

[jlderrien]

Merci à toi pour cette réponse.

Mais pas mieux. Le mail passe correctement, le sujet et le corps sont là mais sans les accents. J'obtiens donc 'test aa' pour le sujet et 'test avec des eae' pour le corps.

Je sens que ça va me pourrir la fin 2012 cette histoire

Cordialement

[Ph. B.]

Pris d'un doute, je viens de reprendre l'exemple et de m'envoyer un message sur mes boites voila.fr, free.fr et gmail.com et je reçois le message correctement accentué (titre et corps).
Seul GMail me pourrit la fin du corps du message si je laisse éàè et que je n'intercale pas des espaces.

N'y a-t-il pas un autre traitement dans l'application (des évènements) qui modifie le contenu avant envoi ?
--
Philippe.

[jlderrien]

Si je mets :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
  idMes.ContentType := 'text/plain;charset=iso-8859-1';
  idMes.ContentTransferEncoding := 'base64';
  idMes.Subject := 'fédération';
  idMes.Body.Text := 'un corps de message avec des éàè';

Dans ce cas le sujet n'a pas d'accents mais le corps du message a bien ses accents.

Et pour répondre à ta question, non aucun traitement avant l'envoi

ça progresse !

[Paul TOTH]

Si je mets :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
 
  idMes.ContentType := 'text/plain;charset=iso-8859-1';
  idMes.ContentTransferEncoding := 'base64';
  idMes.Subject := 'fédération';
  idMes.Body.Text := 'un corps de message avec des éàè';

Dans ce cas le sujet n'a pas d'accents mais le corps du message a bien ses accents.

Et pour répondre à ta question, non aucun traitement avant l'envoi

ça progresse !

le titre et le corps sont encodés séparément, j'ai étudié tout cela en son temps

par exemple le titre "Re: Ménage" pourra être codé : "Subject: Re: =?ISO-8859-1?Q?m=E9nage?="...reste à savoir comment Indy gère cela

manifestement "ContentTransferEncoding" correspond au contenu, pas au titre.

tu peux essayer de mettre idMes.Subject := '=?ISO-8859-1?Q?f=E9d=E9ration?=';, l'encodage remplace simplement les lettres accentuées par =XX où XX est la valeur hexa du code ascii.

[jlderrien]

Bonjour

Effectivement cela fonctionne en encodant de cette manière le sujet du mail.

En mixant cette technique et le "ContentTransferEncoding := 'base64';" j'arrive à envoyer un mail avec accents !

Merci à tous les 2 pour votre aide.

Paul, je regarde le lien que tu as indiqué.

Cordialement