DispFPHTMLDocument 对象

多个对象 DispFPHTMLDocument WebEx

代表当前窗口中的 HTML 文档。DispFPHTMLDocument 对象包含与 HTML 网页相关的所有属性信息，例如背景色、链接颜色和样式表，还包含作用于数据的方法，例如 CreateElement 和 ExecCommand 方法。

使用 DispFPHTMLDocument 对象

若要访问 DispFPHTMLDocument 对象，请使用 Application 对象或 PageWindowEx 对象的 ActiveDocument 属性。下列示例返回当前应用程序中的活动文档。

Set objDoc = objApp.ActiveDocument

使用 PagewindowEx 对象的 Document 属性可以返回当前在网页窗口中的 HTML 文档。下列示例返回当前 DispFPHTMLDocument，修改其背景色并显示其标题。

Sub Document()
'Returns the active HTML document

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Dim objPgeWdw As PageWindowEx
    Set objApp = FrontPage.Application
    'Create reference to active page window
    Set objPgeWdw = objApp.ActivePageWindow
    'Create reference to open document
    Set objDoc = objPgeWdw.Document

    With objDoc
        'Display title and change background color
        MsgBox .Title
        .bgColor = "FFFFFF"
    End With
End Sub