在发布站点之后发生。
Private Sub expression_OnAfterPublish(Success As Boolean)
expression 引用 WebEx 类型对象的变量名称,该对象是在类模块中以事件方式声明的。
Success Boolean 类型,确定发布操作是否成功。如果为 True,则站点发布成功。
以下示例基于 Publish 方法的结果向用户显示一条消息。
Private Sub objWeb_OnAfterPublish(Success As Boolean)
'Occurs after a web is published
If Success = True Then
MsgBox "The web was published successfully."
Else
MsgBox "An error occurred, the web was not published.", vbExclamation
End If
End Sub