6 39 1 VB Example

6.39.1 VB Example

Global iSession as Integer   ' declare as global as all functions 

                           ' will use it as a parameter

…

'Get Session ID

iSession = LceGetSessionId()

If iSession = 0 Then

   MsgBox "No Session ID"

   End ' nothing you can do 

End If