Envoi mail par Outlook (Vb6)

lionyz Messages postés 62 Date d'inscription samedi 10 janvier 2009 Statut Membre Dernière intervention 30 octobre 2012 - 17 sept. 2011 à 12:08
 Utilisateur anonyme - 18 sept. 2011 à 16:46
Bonjour,

Avec le code ci-dessous je peux envoyer
du texte dans un mail avec Outlook
Je voudrais intégrer un logo (image bitmap)
en tête de mon mail
Je n'ai pas trouvé le code pour faire cette
opération
Merci de votre aide

Code VB6:
Dim ol As New Outlook.Application
Dim olmail As MailItem

'Conception de l'envoi
'
Set ol = New Outlook.Application
Set olmail = ol.CreateItem(olMailItem)

With olmail
.To = Adresse
.Subject = Sujet
.Body = Texte
.ReadReceiptRequested = True
.Send
End With

Set ol = Nothing
Set olmail = Nothing

4 réponses

Utilisateur anonyme
17 sept. 2011 à 17:46
Salut Lion,

Je dis peut-être une bêtise mais je crois que l'image doit être stockée dans un serveur web et tu lui envoies juste son adresse dans ton mail (http://...Logo.gif")


CF2i - Guadeloupe
Ingénierie Informatique
0
Utilisateur anonyme
17 sept. 2011 à 17:49
Tu peux faire des tests avec un logo à moi:
http://www.pixelvision.free.fr/logo.gif


CF2i - Guadeloupe
Ingénierie Informatique
0
lionyz Messages postés 62 Date d'inscription samedi 10 janvier 2009 Statut Membre Dernière intervention 30 octobre 2012
18 sept. 2011 à 16:35
Bonjour,

Merci de ta réponse
Le lien apparait bien en tête de l'email
mais pas le logo.
Pour faire apparaitre le logo il faut cliquer
sur le lien
Je cherche un code qui permette d'intégrer le logo dans le mail
0
Utilisateur anonyme
18 sept. 2011 à 16:46
Salut,

Fait voir le morceau de code du corps de l'email.

Normalement tu dois inscrire quelque chose du genre:
Mail.Body = "<img src=http://www.pixelvision.free.fr/logo.gif" et le corps de ton message non?


CF2i - Guadeloupe
Ingénierie Informatique
0