A scripting for rebooting system

<iframe align="center" marginwidth="0" marginheight="0" src="http://www.zealware.com/csdnblog336280.html" frameborder="0" width="336" scrolling="no" height="280"></iframe>

strComputer="."
SetobjWMIService=GetObject("winmgmts:"_
&"{impersonationLevel=impersonate,(Shutdown)}!/"&strComputer&" ootcimv2")
SetcolOperatingSystems=objWMIService.ExecQuery_
("Select*fromWin32_OperatingSystem")
ForEachobjOperatingSystemincolOperatingSystems
ObjOperatingSystem.Reboot()
Next