Bonjour
je souhaite envoyer un email au format HTML
Je pensais pouvoir utiliser la fonction Email.html mais le mail est vide.
Voici mon code
Dans l'aide, il est noté que la fonction email.html remplace email.message.
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
32 strcorps est une chaîne strcorps="<HTML><BODY>"+... "<TABLE>"+... "<tr>"+... "<td>N° Commande : </td>"+... "<td>Date de livraison prévue : </td>"+... "<td>Article : </td>"+... "<td>Description : </td>"+... "<td>Qté commandée : </td>"+... "</tr>"+... "<tr>"+... "<td>000235456</td>"+... "<td>29/10/2007</td>"+... "<td>MARQ0001</td>"+... "<td>MARQUEUR DE COULEUR BLANCHE</td>"+... "<td>10</td>"+... "</tr>"+... "</table></body></html>" //envoi de l'email idsession est un entier idsession = EmailOuvreSession("Paramètres Microsoft Exchange") Email.Sujet="test" Email.NbDestinataire = 1 Email.Destinataire = "toto@toto.net" Email.html=strcorps SI EmailEnvoieMessage(idsession) = Faux ALORS Erreur("EmMailEnvoieMessage a échoué '" + ... ErreurInfo(errMessage) + "'") FIN
Comment je dois m'y prendre?
Merci d'avance.
Partager