...
Check if the connected session is ready for input.
Function TestForKbUnlocked As Long
No parameters
Return Code | Description |
JGS_OK | Keyboard is unlocked and ready for input |
JGS_NOTCONNECTED | Your application is not connected to a session |
JGS_PSBUSY | Session is in X-Clock or X-System mode |
JGS_INHIBITED | The keyboard is locked |
JGS_SYSERROR | The function failed due to a system error |
Sample Code
Dim result as Long
result = sess.TestForKbUnlocked
If result = JGS_OK then
...
Else
...
End If
...