Leaked source code of windows server 2003
You can not select more than 25 topics
Topics must start with a letter or number, can include dashes ('-') and can be up to 35 characters long.
|
|
on error resume next const wbemPrivilegeShutdown = 18
set service = getobject("winmgmts:{impersonationLevel=impersonate}") service.security_.impersonationLevel = 3 service.security_.privileges.Add wbemPrivilegeShutdown set osset = service.instancesof ("Win32_OperatingSystem")
for each os in osset WScript "About to shut down os " & os.path_.relpath result = os.Shutdown ()
if err <> 0 then WScript.Echo Hex(Err.Number), Err.Description else WScript.Echo "Shutdown returned result " & result end if next
|