OVH Cloud OVH Cloud

Syntaxe VBS HTMLBody

1 réponse
Avatar
philippe
Bonjour,
Je cherche à composer un message html en VBS à partir d'un bouton placé sur
un formulaire contact (personalisé).

Quand je clique sur le bouton, j'ai le message d'erreur suivant :
argument ou appel de procédure incorrect : 'body format'

Le code est ci-dessous.
Est-ce que quelqu'un voit se qui m'échape ?
Merci,
Philippe

----- code ---
sub messageHtml_click()
strTitre = "un message html"
strCorpsMessage = "<b>je veux devenir un message html </b>"

Set monCourriel= Item.Application.CreateItem(olMailItem)

With monCourriel
.To = strDestinataires
.Subject = strTitre
.BodyFormat = olFormatHTML
.HTMLBody = strCorpsMessage
.display
End With

End Sub
------------------

1 réponse

Avatar
Laurent Francfort [MS]
Bonjour,

Apparemment, contrairement à ce qui est indiqué dans la doc du développeur,
la propriété Bodyformat est en lecture seule. Regarde en bas de cette note :
http://support.microsoft.com/kb/307594/en-us

Mais en fait tu n'as pas besoin de travailler sur Bodyformat : dès que tu
travailles sur HTMLBody au lieu de Body, ton corps de message sera en HTML
même si Outlook (j'ai testé sur 2003) est configuré pour être en texte brut
ou en RTF par défaut..

Laurent

"philippe" a écrit dans le message de
news:
Bonjour,
Je cherche à composer un message html en VBS à partir d'un bouton placé
sur
un formulaire contact (personalisé).

Quand je clique sur le bouton, j'ai le message d'erreur suivant :
argument ou appel de procédure incorrect : 'body format'

Le code est ci-dessous.
Est-ce que quelqu'un voit se qui m'échape ?
Merci,
Philippe

----- code ---
sub messageHtml_click()
strTitre = "un message html"
strCorpsMessage = "<b>je veux devenir un message html </b>"

Set monCourriel= Item.Application.CreateItem(olMailItem)

With monCourriel
.To = strDestinataires
.Subject = strTitre
.BodyFormat = olFormatHTML
.HTMLBody = strCorpsMessage
.display
End With

End Sub
------------------