Reference Guide

'*** Declare variables

Dim strNameSpace

Dim strComputerName

Dim strClassName

Dim strKeyValue

Dim objInstance

Dim strPropName

Dim strPropValue

Dim oInParams

Dim objWMIService

Dim returnValue

Dim ColSystem

Dim strAttributeName(2)

Dim strAttributeValue(2)

Dim strAuthorizationToken

'*** Check that the right executable was used to run the script and that all parameters were passed.

If (LCase(Right(WScript.FullName, 11)) = "wscript.exe" ) Or _

(Wscript.Arguments.Count < 1) Then

Call Usage()

WScript.Quit

End If

'*** Initialize variables

strNameSpace = "root/dcim/sysman"

strComputerName = WScript.Arguments(0)

strClassName = "DCIM_BIOSService"

strAttributeName(0) = "Wake On LAN"

'*** All possible values for WOL are as follows:

'*** 1 = Disable

'*** 2 = Add-in

'*** 3 = On board

'*** 4 = LAN

'*** 5 = PXE boot enable

356