restart pc dan shutdown pc vb code

Restart PC
source Code

Declarations
Declare function Exitwindows lib "User32" alias "ExitWindowsEx" (byval option as string , byval charge as string)

Code
'To restart windows 95,98,Me:
Exitwindows 94,94
'To restart Windows XP
shell ("Shutdown /r /t 0")


KALO INI SHUTDOWN
acces shutdownlog
source code

Declarations
' Developer: Wayne Alec de Bruin email@intekom.co.za

'Windows Shut Down Dialog.
Private Declare Function SHShutDownDialog Lib "shell32" Alias "#60" (ByVal YourGuess As Long) As Long

Code
Private Sub mnuShutdownDialog_Click()
'
'Windows Shut Down Dialog. (See Declarations)
SHShutDownDialog 0
'
End Sub