InfoConnect for Airlines VBA Guide
GetViewsByFilePath Function
The session file path to match
Gets a collection of views that match the session file path.
Syntax
object.GetViewsByFilePath( _
   ByVal filePath As String _
) As _View()

Parameters

filePath
The session file path to match

Return Value

A set of Views that match the file path
Remarks

If you are developing a Microsoft Office macro, use a Variant type when enumerating through a set as shown in the following sample. Do not use a View type as an enumerator in a Microsoft Office macro.

If you are developing a macro in a Micro Focus product, you can use a Variant type or a View type for the enumerator.

Example
This sample gets all of the running views and prints the number of views and the title of each view.
Public Sub GetRunningViewsByFilePath()
    'Declare object variables for the Application and Frame Objects
    Dim app As Attachmate_Reflection_Objects_Framework.ApplicationObject
    Dim f As Attachmate_Reflection_Objects.Frame
    
    'Declare variables for views
    Dim myView As Attachmate_Reflection_Objects.view
    Dim v As Variant
    Dim allViews As Variant
    
    'Get a handle to the Application object
    Set app = GetObject("Reflection Workspace")
    
    'Get the Frame object and print the number of views
    Set f = app.GetObject("Frame")
    Debug.Print "count=" & f.ViewCount
 
    'Get all the view objects in the frame and print the title of each view
    For Each v In f.GetViewsByFilePath(Environ$("USERPROFILE") & "\Documents\Micro Focus\InfoConnect\demo.rd3x")
        Set myView = v
        Debug.Print "View title = " & myView.titleText
    Next
End Sub
See Also