Using Session Object Methods

This object retrieves information about the current session.

The following is an example.

Dim objnVision As Object
Dim objSessionCmd As Object
Dim strAppName As String
Dim strDatabaseType As String
strAppName = "PSnvision.nvsdesigner"
Set objnVision = CreateObject(strAppName)
Set SessionCmd = objnVision.SessionCmd

After finishing with the session object, clear the PS/nVision object by setting it equal to nothing, as in the following example:

Set objnVision = Nothing