VerifyAllLinks 方法

       

验证当前站点层次结构中的所有超链接。“断开的超链接”报表使用 VerifyAllLinks 方法来显示任何包含断开超链接的网页。

expression.VerifyAllLinks

expression  必选。返回“应用于”列表中的对象之一的表达式。

示例

下列示例创建对活动站点窗口的引用,并调用 VerifyAllLinks 方法来检查当前项目中是否存在断开的超链接。然后,活动站点窗口会切换到“断开的超链接”报表视图。

Sub VerifyLinks()
'Verifies broken links in the current view

    Dim objApp As FrontPage.Application
    Dim objWebwdw As WebWindowEx

    Set objApp = FrontPage.Application
    Set objWebwdw = objApp.ActiveWebWindow
    'Verify all links in the current web.
    objWebwdw.VerifyAllLinks

End Sub