parentWindow Property

       

Returns an FPHTMLWindow2 object that represents the parent window of the current document.

expression.parentWindow

expression   Required. An expression that returns a DispFPHTMLDocument object.

Example

The following example displays the name of the current document's parent window if it exists. If the name property is not specified, a message is displayed to the user.

Sub ReturnParent()
'Returns the parent window of the active document

    Dim objApp As FrontPage.Application
    Dim objDoc As DispFPHTMLDocument
    Dim wdwParent As FPHTMLWindow2

    Set objApp = FrontPage.Application
    Set objDoc = objApp.ActiveDocument
    'Create reference to active document's parent window
    Set wdwParent = objDoc.parentWindow
    'If parent's name exists
    If Not wdwParent.Name = "" Then
        'Display names to user
        MsgBox objDoc.nameProp & "'s parent window is " _
                               & wdwParent.Name & "."
    Else
        'Display message to user
        MsgBox objDoc.nameProp &  _
               "'s parent window does not have a name or does not exist."
    End If

End Sub