Bonjour,
J'essaie en vain de trouver un moyen d'envoyer un email en HTML
via mon application.
But recherché :
L'utilisateur clique sur un bouton, un mail HTML est généré, et
celui est ouvert dans le clent de messagerie par défaut attendant
que l'utilisateur appuie sur "Envoyer".
J'arrive a le faire en mode texte :
Le mail n'est pas envoyé par l'application mais par le client
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
33
34 Dim myMAPISession As New MAPISession Dim myMAPIMessages As New MAPIMessages myMAPISession.SignOn() With myMAPIMessages .SessionID = myMAPISession.SessionID .Compose() 'Destinataire principal .RecipIndex = 0 .RecipType = 1 .RecipDisplayName = "??@??.??" 'Adresse e-mail du destinataire principal 'Destinataire en copie conforme .RecipIndex = 1 .RecipType = 2 .RecipDisplayName = "??@??.??" 'Adresse e-mail du destinataire Destinataire en copie conforme 'Destinataire en copie conforme invisible .RecipIndex = 2 .RecipType = 3 .RecipDisplayName = "??@??.??" 'Adresse e-mail du destinataire en copie conforme invisible ''''''''' .MsgSubject = "Sujet" ' Sujet .MsgNoteText = "Texte" ' Contenu du message Try .Send(True) Catch ex As Exception MsgBox("Erreur : " & ex.Message.ToString) End Try End With myMAPISession.SignOff()
donc que se soit du SMTP ou du EXCHANGE, le mail sera envoyé.
Merci d'avance.
Partager