FrontPage VBA教程:OnWebOpen事件

在打开站点时发生。

Private Sub Application_OnWebOpen(ByVal pWeb As Web)

pWeb  必选,WebEx 类型。WebEx对象。

注释

OnWebOpen事件与 Application对象相关联。当用户在 Microsoft FrontPage 中打开站点时,OnWebOpen事件会触发并且执行事件过程中指定的代码。

VBA示例

本示例在打开站点时打开 Index.htm 文件。

注意  本示例使用 Rogue Cellars 作为指定要打开的站点。您可以创建一个称为 Rogue Cellars 的站点,或可用您所选择的站点来代替。

创建一个称为 frmLaunchEvents.frm 的表单并添加两个按钮,分别称为cmdOpenPagecmdCancel。将下列代码添加到表单代码窗口的 Declarations 部分。


Option Explicit
Private WithEvents eFPApplication As Application
Private pPage As PageWindowEx

将下列代码添加到代码窗口的 UserForm_Initialize 部分。


Private Sub UserForm_Initialize()
    Set eFPApplication = New Application
End Sub

将下列代码添加到代码窗口的 cmdOpenWeb_Click 部分。


Private Sub cmdOpenWeb_Click()
    Webs.Open ("file:///C:/My Documents/My Webs/Rogue Cellars")
End Sub

将下列代码添加到代码窗口的 cmdCancel_Click 部分。


Private Sub cmdCancel_Click()
    'Hide the form.
    frmLaunchEvents.Hide
    Exit Sub
End Sub

将下列代码添加到代码窗口的 eFPApplication_OnWebOpen 部分。


Private Sub eFPApplication_OnWebOpen(ByVal pWeb As Web)
    Dim myFile As WebFile
    Set myFile = pWeb.RootFolder.Files.Add("index.htm")
    myFile.Open
End Sub

上页:FrontPage VBA教程:OnWebNew事件 下页:FrontPage VBA教程:WindowActivate事件

FrontPage VBA教程:OnWebOpen事件

FrontPage VBA教程:WindowActivate事件 FrontPage VBA教程:WindowDeactivate事件
FrontPage VBA教程:隐藏的语言元素 FrontPage VBA教程:由设计阶段控件访问 FrontPage 中的对象模型
FrontPage VBA教程:使用 Microsoft Visual Basic 访问 FrontPage 框架集 FrontPage VBA教程:创建 Web 站点
FrontPage VBA教程:探索 FrontPage 中的 Page对象模型 FrontPage VBA教程:探索 FrontPage 中的对象模型
FrontPage VBA教程:探索过程 FrontPage VBA教程:Microsoft FrontPage 2002 支持的 HTML事件
FrontPage VBA教程:FrontPage 2002 不支持的 HTML事件 FrontPage VBA教程:FrontPage 2002 支持的 HTML方法
FrontPage VBA教程:FrontPage 2002 不支持的 HTML方法 FrontPage VBA教程:Microsoft FrontPage 2002 中的 HTML对象
FrontPage VBA教程:FrontPage 2002 支持的 HTML属性 FrontPage VBA教程:FrontPage 2002 不支持的 HTML属性
FrontPage VBA教程:FrontPage 特有的方法 FrontPage VBA教程:FrontPage 特有的对象
FrontPage VBA教程:FrontPage 特有的属性 FrontPage VBA教程:用 MetaTags 管理发布
版权所有 © 中山市飞娥软件工作室 证书:粤ICP备09170368号