FrontPage VBA教程:Application对象

   
Application
多个对象

代表 Microsoft FrontPage 应用程序。Application对象包含可以返回顶层对象的属性和方法。例如,ActiveDocument属性返回文档对象,它所引用的 FrontPage Page对象模型与 Microsoft Internet Explorer 4.0 及其更高版本兼容。

使用 Application对象

使用 Application属性可以返回 Application对象。您可以使用 FrontPage 中任何对象的 Application属性。下列示例通过活动WebEx对象检查当前用户的登录,并设置相应的安全性设置。该示例假设已经存在一个名为 CheckUserName 的过程。


Private Sub GetLogonName()
    Dim myWeb As WebEx
    Dim currLogonName As String
    Dim userSecurityLevel As Integer
    Set myWeb = ActiveWeb
    CurrentLogonName = myWeb.Application.UserName
    If CurrentLogonName = “Guest” then
        userSecurityLevel = 10
    Else
        Call CheckUserName(currLogonName)
    End If
End Sub

许多属性和方法都可以返回最常用的用户界面对象,例如 ActiveDocument属性,这些属性和方法使用时可以不加 Application对象识别符。例如,您可以不用Application.ActiveDocument.Title,而使用ActiveDocument.Title。使用时可以不加 Application对象识别符的属性和方法视为“全局”。若要在对象浏览器中查看全局属性和方法,请单击对象浏览器“类”框中的列表顶部的 <全局>。

说明

若要从另一个应用程序使用 Automation 来控制 FrontPage,请使用 CreateObject 或 GetObject函数来返回 FrontPage Application对象。下列的 Microsoft Word Visual Basic for Applications 示例启动 FrontPage,打开现有的站点,然后关闭该站点。


Private Sub StartFrontPage()
    Dim myNewFP As Variant
    Set myNewFP = CreateObject("FrontPage.Application")
    myNewFP.Webs.Open ("C:\MyWebs\Adventure Works")
    myNewFP.Webs.Close "(C:\MyWebs\Adventure Works")
    Set myNewFP = Nothing
End Sub

上页:FrontPage VBA教程:VerifyAllLinks方法 下页:FrontPage VBA教程:BasicList对象

FrontPage VBA教程:Application对象

FrontPage VBA教程:BasicList对象 FrontPage VBA教程:DispFPHTMLDocument对象
FrontPage VBA教程:DocumentLibrary对象 FrontPage VBA教程:IFPDocument对象
FrontPage VBA教程:IHTMLFrontPageBotElement对象 FrontPage VBA教程:List对象
FrontPage VBA教程:ListField对象 FrontPage VBA教程:ListFieldChoice对象
FrontPage VBA教程:ListFieldComputed对象 FrontPage VBA教程:ListFieldCounter对象
FrontPage VBA教程:ListFieldCurrency对象 FrontPage VBA教程:ListFieldDateTime对象
FrontPage VBA教程:ListFieldFile对象 FrontPage VBA教程:ListFieldInteger对象
FrontPage VBA教程:ListFieldLookup对象 FrontPage VBA教程:ListFieldMultiLine对象
FrontPage VBA教程:ListFieldNumber对象 FrontPage VBA教程:ListFields集合
FrontPage VBA教程:ListFieldSingleLine对象 FrontPage VBA教程:ListFieldTrueFalse对象
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号