Source Code for Me (s-c.me)

Code's Tags

- CSS
Your Codes

None
Reffers

None
-------------------
Linked Codes

- 5344. option explicit dim o

Code:

As HTMLAs CSS Selected Language:
Show Linenumbers:

Short link for Twitter:

HTML:

<blockquote><code><a href="http://s-c.me/5345/s">Copy&nbsp;Source</a>&nbsp;|&nbsp;<a href="http://s-c.me/5345/h">Copy&nbsp;HTML</a><ol><li>option explicit</li>
<li>&nbsp;</li>
<li>dim osObj, osColl </li>
<li>const nLogOff=&nbsp;0 </li>
<li>const nReboot=2 </li>
<li>const nForceLogOff=4 </li>
<li>const nForceReboot=6 </li>
<li>const nPowerDown=8 </li>
<li>const nForcePowerDown=12 </li>
<li>&nbsp;</li>
<li>Set osColl = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * from Win32_OperatingSystem") </li>
<li>&nbsp;</li>
<li>For Each osObj in osColl</li>
<li>&nbsp;&nbsp;&nbsp;&nbsp;osObj.Win32Shutdown(nForcePowerDown)</li>
<li>Next </li>
</ol></code></blockquote>

Copy to clipboard (IE,FF)

HTML view:

Copy Source | Copy HTMLoption explicit dim osObj, osColl const nLogOff= 0 const nReboot=2 const nForceLogOff=4 const nForceReboot=6 const nPowerDown=8 const nForcePowerDown=12 Set osColl = GetObject("winmgmts:{(Shutdown)}").ExecQuery("Select * from Win32_OperatingSystem") For Each osObj in osColl osObj.Win32Shutdown(nForcePowerDown) Next

Source Code for Me (s-c.me)

Code's Tags

Your Codes

Reffers

Linked Codes