Discussion :

[StephCoul]

Bien le bonjour
Comme dit dans l'intitulé, je cherche à créer un mail au format HTML de sorte à avoir quelque chose qui ressemble à ceci (la partie en rouge):
Mais je galère à trouver comment faire. J'ai beaucoup fouillé sur le net, mais rien.
Dans mon cas, il s'agit d'envoyer par mail en format html (comme sur l'image juste au dessus) un état que j'ai exporté en html (il s'agit d'un état de test hein ):
Voici le code que j'utilise:

Code :

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

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
 
HExécuteRequête(REQ_N_Premiers_Armateurs,hRequêteDéfaut,SAI_n)
 
sChemin_html	est une chaîne	= fRepExe() + "\nom_doc.html"
 
iDestination(iHTML,sChemin_html)
iImprimeEtat(ETAT_n_premiers)
 
MaSession est un emailSessionSMTP
MaSession..AdresseServeur	= "***.***.***.***"
MaSession..Port				= 25
 
SI EmailOuvreSession(MaSession) ALORS
 
	mail est un Email
	mail.Expediteur = "***@gmail.com"
	Ajoute(mail.Destinataire,SAI_E_mail)
	mail.Sujet	= SAI_Objet
	MonTexteHTML est une chaîne
	MonTexteHTML = fChargeTexte(sChemin_html)
	mail.ImporteHTML(MonTexteHTML,fRepExe())
 
	SI EmailEnvoieMessage(MaSession,mail) ALORS
		Info("Message envoyé")
	SINON
		Erreur()
	FIN
 
SINON
	Info("pas ouvert")
FIN

Le mail est bien envoyé mais je reçois un mail avec un corps vide.
Au passage, j'utilise webdev 25.
Merci aux bonnes âmes qui voudraient bien venir à mon aide .