Dim scriptName As String

scriptName = Session.ConnectScript

With Session

 'Testing a boolean value

 If .Connected = False Then .Connect

 

 'Modifying an existing value

 .Caption = .Caption & " Joe's Session"

 

 'Using a value in a message box

 MsgBox "The number rows in the display is " & .DisplayRows

End With