Rebooting PC

[jizviz]

I am trying to write a program that will reboot a PC prior to running a backup program but I have been unsuccessful getting the PC to reboot. My code looks like this:

Public Const EWX_FORCE = 4
Public Const EWX_LOGOFF = 0
Public Const EWX_REBOOT = 2
Public Const EWX_SHUTDOWN = 1

Declare Function ExitWindowsEx Lib "user32" (ByValuFlags As Long, ByVal dwReserved As Long) As Long

Sub Restart()
Dim test As Long

test = ExitWindowsEx(EWX_FORCE, 0)

End Sub

Can anyone tell me why this doesn't work? Thanks!!

 

[vbrocks]

Go here (link is all one line)

http://msdn.microsoft.com/library/default.asp?url=/library/en-us/sysinfo/base/exitwindowsex.asp

 

[vbrocks]

Warning DO NOT USE THE EWX_FORCE TAG YOU COULD LOSE DATA!

You should be using ... EWX_REBOOT

But you need the SE_SHUTDOWN_NAME privilege ...

Just go to the previous link I posted, it explains everything.

 

[jizviz]

Thanks for the info!

 

[vbrocks]

Your welcome...