HTMLEditor 属性

返回正在显示的邮件的 HTML 文档对象模型。Object 类型。HTML 文档对象模型由 Microsoft Internet Explorer 定义并用于动态 HTML。该对象可能是暂时的，不应存储它供将来使用。只读。

仅当与项目相关联的 Inspector 对象的 EditorType 属性设置为 olEditorHTML 时，HTMLEditor 属性才有效。

expression  必选。该表达式返回 Inspector 对象。

示例

以下 VBScript 示例使用名为“CommandButton1”的 CommandButton 控件的 Click 事件来演示所有 HTML 元素的列表。

Sub CommandButton1_Click()
    Dim i         'As Integer
    Dim strHTMLType    'As String
    Dim strHTMLText    'As String
    Dim NL        'As String

    NL = chr(10) & chr(13)

    Set myInspector = Item.GetInspector
    Set myIExplorer = myInspector.HTMLEditor
    If myIExplorer.ReadyState <> "complete" Then  
'Test for complete loading of HTML doc
        For i = 0 To myIExplorer.All.Length - 1
            strHTMLType = TypeName(myIExplorer.All.Item(i))
            On Error Resume Next
'because not all elements support OuterHTML
            strHTMLText = ": " & NL &     myIExplorer.All.Item(i).outerHTML
            On Error GoTo 0
            MsgBox strHTMLType & strHTMLText
            strHTMLText = ""
        Next
    End If
End Sub