Discussion :

[BRUNO71]

Bonjour,

Quelle différence entre ces deux codes :

Code :

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

OutlookMessage.Body = "<div>une phrase</div><br>" & Text_Civilité.Text & "<br>" & Txt_corps_Courrier.Text

ET

Code :

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

OutlookMessage.HTMLBody = "<div>une phrase</div><br>" & Text_Civilité.Text & "<br>" & Txt_corps_Courrier.Text

Ma textbox (Txt_corps_Courrier.Text) contient une mise en forme depuis un fichier texte que j’aimerais conserver.

Dans le premier code :
L’e-mail n’est pas au format HTML car la ligne arrive comme ceci avec les balises :
(<div>une phrase</div><br>Madame, Monsieur,<br>
Par contre la mise en forme d’origine du fichier texte est conservée. (Et ça c’est bien).

Dans le deuxième code :
L’e-mail est bien au format HTML mais :
La textbox (Txt_corps_Courrier.Text) perd sa mise en forme.

Comment faire pour être au format HTML tout en gardant la mise en forme de mes textbox qui prennent leur texte dans un fichier txt ?

Par avance, merci.

[joKED]

Bonjour,

Par mise en forme, je suppose que tu fais référence aux sauts de ligne. (un petit exemple de ce que contient le fichier texte en question pourrait aider à résoudre ton problème).

Avec OutlookMessage.Body, tu crées un message au format texte brut. Donc, tes sauts de lignes venant d'un fichier texte brut, ils sont donc conservés dans le message. Par contre, s'agissant d'un message au format texte brut, tes balises html ne sont donc pas interprétées.

Avec OutlookMessage.HTMLBody, tu crées un message au format html. Tes balises html sont donc interprétées. Par contre, tes sauts de lignes venant de ton fichier texte brut ne le sont pas. Et c'est normal. Pour un saut de ligne, en html, tu peux utiliser la balise "<br/>".

Donc, pour conserver tes sauts de ligne dans ton message au format html, tu peux les remplacer par des balises "<br/>".
D'autre part, il serait peut être utile aussi d'encoder la totalité du contenu de ton fichier texte en html pour éviter les éventuels problèmes de caractères spéciaux (voir WebUtility.HtmlEncode)

[BRUNO71]

Bonjour joKED,

(un petit exemple de ce que contient le fichier texte en question pourrait aider à résoudre ton problème).

Pas besoin car tu as parfaitement compris mon soucis.
Je viens d'essayer avec ça, mais sans résultat.

Code :

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

1
2
 
Dim Corps_Courrier As String = System.Net.WebUtility.HtmlEncode(Txt_corps_Courrier.Text)

Par contre comme ceci c'est super ça marche bien, ça conserve les saut de ligne de mon fichier texte....

Code :

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

1
2
 
Dim Corps_Courrier As String = Replace$(Txt_corps_Courrier.Text, vbCrLf, "<br>")

Merci à toi de m'avoir aidé...