Insertion image dans mail
Bonjour,
J'essai en vain d'incorporer une image dans le corp de mon mail via une variable.
Si j'indique le nom du fichier, je ne rencontre aucun soucis.
Code:
1 2 3 4 5 6 7
| With oMailItem
'...
.Attachments.Add "C:\Utilisateurs\Martin\TEMP\MonImage1.jpg", olByValue, 0
'...
.HTMLBody = .HTMLBody & "<br><img src='cid:MonImage1.jpg' width='500' height='200'>"
End With |
par contre, si j'indique une variable à la place du nom du fichier, cela ne fonctionne pas.
Code:
1 2 3 4 5 6 7 8 9 10 11 12
| Dim image as string
image = "MonImage1.jpg"
With oMailItem
'...
.Attachments.Add "C:\Utilisateurs\Martin\TEMP\" & image, olByValue, 0
'...
.HTMLBody = .HTMLBody & "<br><img src='" & image & "' width='500' height='200'>"
End With |
Pouvez-vous m'aider s'il vous plaît ?
Merci
Cdlt