• Home
 · 
• Windows System Services
 · 
• Exit / Shutdowns Windows

Exit / Shutdowns Windows

Exit / Shutdowns Windows

API Declarations


' * Programmer Name : Waty Thierry
' * Web Site : www.geocities.com/ResearchTriangle/6311/
' * E-Mail : [email protected]
' * Date : 13/10/98
' * Time : 10:24
' * Module Name : Windows_Module
' * Module Filename : Windows.bas
' **********************************************************************
' * Comments :
' * Exit Windows
' **********************************************************************

' *** Exit windows with one of the following results. dwReserved = 0
Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long

Public Const EXIT_LOGOFF = 0
Public Const EXIT_SHUTDOWN = 1
Public Const EXIT_REBOOT = 2




Rate Exit / Shutdowns Windows

• 1
• 2
• 3
• 4
• 5

(2(2 Vote))

' * Programmer Name  : Waty Thierry
' * Web Site         : www.geocities.com/ResearchTriangle/6311/
' * E-Mail           : [email protected]
' * Date             : 13/10/98
' * Time             : 10:24
' * Module Name      : Windows_Module
' * Module Filename  : Windows.bas
' **********************************************************************
' * Comments         :
' *  Exit Windows
' **********************************************************************

Public Sub ShutDownWindows(ByVal uFlags As Long)
   
   ' * Programmer Name  : Waty Thierry
   ' * Web Site         : www.geocities.com/ResearchTriangle/6311/
   ' * E-Mail           : [email protected]
   ' * Date             : 26/11/98
   ' * Time             : 15:05
   ' * Module Name      : Lib_Module
   ' * Module Filename  : Lib.bas
   ' * Procedure Name   : ShutDownWindows
   ' * Parameters       :
   ' *                    ByVal uFlags As Long
   ' **********************************************************************
   ' * Comments         : Exit the Windows
   ' *
   ' *
   ' **********************************************************************
   
   Call ExitWindowsEx(uFlags, 0)
   
End Sub