VBScript – reboot & shutdown computer systems

Posted in VBS Scripts - 18 March 2009 - No comment

Version: 13.2
Revision: 44 Build 11

VBScript – reboot & shutdown computer systems

Introduction: many users had asked me to create a VBScript, so that they can shutdown their computer, when they are in an airport or other areas. After two days, I’ve managed to complete my script. However, it’s a pain in the neck to construct one! But, that road is not for you to worry about.

I take the risk and testing. But, the rest is for you to enjoy!

1.] Download notepad++ from the original author or from another source.
——————————-

http://sourceforge.net/projects/notepad-plus/

http://filehippo.com/download_notepad/

——————————-

2.] Copy this ‘VBScript’ source code and save it as a “.vbs” extension.

VBScript – Reboot Computer Systems
—Copy Source Code—

'Version: 12.2
'Revision: 44 Build 22
'Copyrighted by Lair360
'*******************************
Set OpSysSet = GetObject("winmgmts:{(Shutdown)}!\\.\root\cimv2").ExecQuery _
("select * from Win32_OperatingSystem where Primary=true")

for each OpSys in OpSysSet
OpSys.Reboot()
next

—End Source Code—

VBScript – Shutdown Computer Systems
—Copy Source Code—

'Version: 12.2
'Revision: 44 Build 22
'Copyrighted by Lair360
'*******************************
Set OpSysSet = GetObject("winmgmts:{(Shutdown)}!\\.\root\cimv2").ExecQuery _
("select * from Win32_OperatingSystem where Primary=true")

for each OpSys in OpSysSet
OpSys.Shutdown()
next

—End Source Code—

3.] Activate the script and enjoy it!

Copyright By Lair360

Tags: , , , , ,

Comments are closed.