Reflection Desktop VBA Guide
Attachmate.Reflection.Objects Library / Attachmate.Reflection.Objects.Productivity Library / Productivity Object / ScreenHistory Property
Example
In This Topic
    ScreenHistory Property
    In This Topic
    Gets the ScreenHistory object, which holds configuration properties, methods, and events for the Screen History Productivity feature.
    Syntax
    expression.ScreenHistory As ScreenHistory object 
    where expression is a variable that represents a Productivity Object

    Property Value

    ScreenHistory Object.
    Example
    This example captures a screen and saves it in a screen history file.
    Sub CaptureAScreenAndSave()
        
        Dim shistory As ScreenHistory
        Dim rcode As ReturnCode
        Dim filename As String
        
        'Check or set the file name for the screen
        filename = InputBox("Save current screen image to:", , Environ("USERPROFILE") & "\Documents\Micro Focus\Reflection\Screen.rshx")
        
        'Get the history object and capture a screen
        Set shistory = ThisIbmTerminal.Productivity.ScreenHistory
        shistory.CaptureScreen
        
        'Save the screen to a screen history file
        rcode = shistory.SaveScreenHistoryFile(filename, True)
        
        'Clear the screen history and close the screen history panel
        shistory.ClearAllScreens
     
    End Sub
    See Also