Option Explicit
Sub Main
Dim intReturn As Integer
intReturn = Action2.LogoffMachine
If intReturn = 0 Then
MsgBox "LogOff failed"
MsgBox( Action2.GetLastError )
End If
End Sub