Restart Button

[J'rd]

What would the code be in VB if I wanted to add a button to a program that would restart the computer. This would be in 2000 and XP if it makes a difference.

Thanks

[qball]

ouch!

with or without user approval? and why?

as in you can follow the path that most winders OSes go through when after some action, OS wanna restart.

"Winders need to restart. Restart now? yes and no button"

"Winders need to restart. Restart now? ONLY yes button" no lose focus, restart or just look at screen.

If you don't know how to do this, maybe you shouldn't be....

Now, I have seen, and tried a DOS batch file, long ago.

I say tried, because it only worked on some PCs, and I don't have the code... wish I could find now.

Anyway, it sent the "reset" message to (most) mobos, and PC rebooted as if you had pressed Reset button on box. Good for malicious prank (run me and lose all work!).

why? do would you want to do this?

[Martee]

You will want to use the Win32 API function ExitWindowsEx(). Now because I have no idea how to call Win32 functions from VB, I did a quick Google search:

*********
Option Explicit

Declare Function ExitWindowsEx lib "user32" (ByVal uFlags As Long, _
ByVal dwReserved As Long) As Long

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

'-- End --'

To use the code add this line where you wish to shut down Windows:

Dim sPar As Long
sPar = ExitWindowEx(command, &H0)
*********

Just stick something like that into a button's click event hander. And be careful!