Share via

external Property

  • Article

Returns a PageWindowEx object.

expression.external

Example

This example returns the active page window, and if the page has been changed, it saves the page.

Sub SaveChangedPage()
    Dim objDoc As IFPDocument
    Dim objWindow As PageWindowEx
    
    On Error GoTo UnableToSavePage
    
    Set objDoc = ActiveDocument
    Set objWindow = ActivePageWindow _
        .ActiveFrameWindow.Window.external
    
    If objWindow.IsDirty Then objWindow.Save

ExitSub:
    Exit Sub
    
UnableToSavePage:
    MsgBox "Unable to save the page.  " & _
        "If you haven't saved the page previously, " & _
        vbCrLf & "you need to save it first before " & _
        "you can use the Save method."
        
    GoTo ExitSub
End Sub

Applies to | FPHTMLWindow2 Object | FPHTMLWindowProxy Object | IHTMLWindow2 Object