FrontPage VBA教程:Document属性

返回 DispFPHTMLDocument对象,该对象提供对 Microsoft FrontPage 中 Page对象模型的访问,该对象模型与 Internet Explorer 4.0 及更高版本兼容。有关 Page对象模型的详细信息,请参阅探索 FrontPage 中的对象模型

VBA示例

本示例打开一个网页,然后使用 insertAdjacentText方法在文档中添加文本。

注意  若要运行本示例,必须有一个名为 “C:\My Documents\My Webs\Rogue Cellars”(对于在 Microsoft Windows 上运行的服务器)或“C:\WINNT\Profiles\logon alias\Personal\My Webs\Rogue Cellars”(对于在 Windows NT 上运行的服务器)的站点。在两种情况下,都可以用其他站点 URL 或文件来代替。还必须有一个名为 Sales.htm 的文件,或用其他文件代替。


Private Sub AddTextToDoc()
    Dim myWeb As WebEx
    Dim myPageWindow As PageWindow
    Dim myText As String
    Set myWeb = _
        Webs.Open("C:\My Documents\My Webs\Rogue Cellars")
    myWeb.Activate
    myText = "Winter Sale Begins November 1st!"
    Set myPageWindow = _
        ActiveWeb.RootFolder.Files("Sales.htm").Edit
    myPageWindow.Document.body.insertAdjacentText _
        "BeforeEnd", myText
    ActivePageWindow.Save
    ActiveWeb.Close
End Sub

上页:FrontPage VBA教程:DisplayFormat属性 下页:FrontPage VBA教程:DocumentHTML属性

FrontPage VBA教程:Document属性

FrontPage VBA教程:DocumentHTML属性 FrontPage VBA教程:domain属性
FrontPage VBA教程:DownloadTime属性 FrontPage VBA教程:EditForm属性
FrontPage VBA教程:EditSecurity属性 FrontPage VBA教程:embeds属性
FrontPage VBA教程:Extension属性 FrontPage VBA教程:external属性
FrontPage VBA教程:fgColor属性 FrontPage VBA教程:Fields属性
FrontPage VBA教程:File属性 FrontPage VBA教程:fileCreatedDate属性
FrontPage VBA教程:FileDialog属性 FrontPage VBA教程:FileDialogViewPage属性
FrontPage VBA教程:fileModifiedDate属性 FrontPage VBA教程:Files属性
FrontPage VBA教程:FileSaveForm属性 FrontPage VBA教程:FileSearch属性
FrontPage VBA教程:fileSize属性 FrontPage VBA教程:fileUpdatedDate属性
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号