Propriété FormDescription.ScriptText (Outlook)
Renvoie une valeur String qui contient tous les éléments de code VBScript figurant dans l’éditeur de script du formulaire. En lecture seule.
Syntaxe
expression. ScriptText
Expression Variable qui représente un objet « FormDescription ».
Exemple
Cet exemple Microsoft Visual Basic Scripting Edition (VBScript) utilise l’événement Open pour accéder à la propriété HTMLBody d’un objet MailItem. Cela définit la propriété EditorType de l’inspecteur de l’objet MailItem sur olEditorHTML. Lorsque la propriété Body de MailItem est définie, la propriété EditorType est remplacée par la valeur par défaut. Par exemple, si l’éditeur de messagerie par défaut est défini sur RTF, EditorType est défini sur olEditorRTF. Si ce code est placé dans l’éditeur de script d’un formulaire en mode Création, les boîtes de message pendant l’exécution reflètent la modification dans editorType à mesure que le corps du formulaire change. La boîte de message finale utilise la propriété Texte du script pour afficher tout le code VBScript dans l’éditeur de script.
Function Item_Open()
'Set the HTMLBody of the item.
Item.HTMLBody = "<HTML><H2>My HTML page.</H2><BODY>My body.</BODY></HTML>"
'Item displays HTML message.
Item.Display
'MsgBox shows EditorType is 2.
MsgBox "HTMLBody EditorType is " & Item.GetInspector.EditorType
'Access the Body and show
'the text of the Body.
MsgBox "This is the Body: " & Item.Body
'After accessing, EditorType
'is still 2.
MsgBox "After accessing, the EditorType is " & Item.GetInspector.EditorType
'Set the item's Body property.
Item.Body = "Back to default body."
'After setting, EditorType is
'now back to the default.
MsgBox "After setting, the EditorType is " & Item.GetInspector.EditorType
'Access the items's
'FormDescription object.
Set myForm = Item.FormDescription
'Display all the code
'in the Script Editor.
MsgBox myForm.ScriptText
End Function
Voir aussi
Assistance et commentaires
Avez-vous des questions ou des commentaires sur Office VBA ou sur cette documentation ? Consultez la rubrique concernant l’assistance pour Office VBA et l’envoi de commentaires afin d’obtenir des instructions pour recevoir une assistance et envoyer vos commentaires.