OnRecalculateHyperlinks Event

Occurs before the hyperlink structure in Hyperlinks view is recalculated to view any changes made to the Web site.

Private Sub expression_OnRecalculateHyperlinks(ByVal pWeb As WebEx, Cancel As Boolean)

expression     An object of type Application declared using the WithEvents keyword in a class module.

pWeb       The WebEx object that contains the view.

Cancel       A Boolean that determines if the event will be cancelled. If False, the event will not be cancelled. If True, the event will be cancelled.

Example

The following example prompts the user before recalculating the hyperlink structure. If the user accepts, the event will continue and the hyperlinks will be recalculated.

Private Sub objApp_OnRecalculateHyperlinks(ByVal pWeb As WebEx, Cancel As Boolean)
'Occurs when the current web's hyperlinks are recalculated.

    Dim strAns As String
    strAns = MsgBox("This action will cause the hyperlinks structure to be recalculated. " _
                     & "Do you want to continue?", vbYesNo)
    'Set value of Cancel argument to users' response
    If strAns = vbYes Then
        Cancel = False
    Else
        Cancel = True
    End If

End Sub