Private Const EWX_LogOff As Long =  0 
Private Const EWX_SHUTDOWN As Long =  1 
Private Const EWX_REBOOT As Long =  2 
Private Const EWX_FORCE As Long =  4 
Private Const EWX_POWEROFF As Long =  8 

'The ExitWindowsEx function either logs off, shuts down, or shuts
'down and restarts the system.
Private Declare Function ExitWindowsEx Lib  "user32"  _
(ByVal dwOptions As Long, _
ByVal dwReserved As Long) As Long