• Home
 · 
• Windows API Call/Explanation
 · 
• Shutdown,Restart and Logoff Windows 9X

Shutdown,Restart and Logoff Windows 9X

Shutdown,Restart and Logoff Windows 9X

API Declarations


'Email:[email protected]
'Location:Iran-Mazandaran-Tonekabon

'-Add 3CommandButton to form


Private Declare Function ExitWindowsEx Lib "user32" (ByVal uFlags As Long, ByVal dwReserved As Long) As Long
Dim Ilog, IRes, IShut As Long





Rate Shutdown,Restart and Logoff Windows 9X

• 1
• 2
• 3
• 4
• 5

(1(1 Vote))

Private Sub Command1_Click()

 IShut = ExitWindowsEx(1, 1) ‘Shutdown

End Sub

 

Private Sub Command2_Click()

 IRes = ExitWindowsEx(2, 1)  ‘Restart

End Sub

 

Private Sub Command3_Click()

 Ilog = ExitWindowsEx(4, 1)  ‘Logoff

End Sub

 

Private Sub Form_Load()

  Command1.FontBold = True

  Command2.FontBold = True

  Command3.FontBold = True

  Command1.Caption = "Shutdown Win98"

  Command2.Caption = "Restart Win98"

  Command3.Caption = "Logoff Win98"

End Sub