Lenovo ThinkPad T400 Manual de implantación - Página 28

WScript.Echo strRequest

WScript.Echo " SaveBiosSettings: " + strReturn

List all BIOS settings on the remote computer

Use the sample scripts in the ZIP file as templates to list all BIOS settings and values on a remote computer.

Syntax: cscript.exe ListAllRemote.vbs [Hostname]Example: cscript.exe ListAllRemote.vbs mattdev-c5

' List all BIOS settings

On Error Resume Next

Dim colItems

If WScript.Arguments.Count <> 1 Then

WScript.Echo "ListAllRemote.vbs [hostname]"

WScript.Quit

End If

strComputer = WScript.Arguments(0)

Set objWMIService = GetObject("WinMgmts:" _

&"{ImpersonationLevel=Impersonate," _

&"authenticationLevel=pktPrivacy}!\\" _

& strComputer & "\root\wmi")

Set colItems = objWMIService.ExecQuery("Select * from Lenovo_BiosSetting")

For Each objItem in colItems

If Len(objItem.CurrentSetting) > 0 Then

Setting = ObjItem.CurrentSetting

StrItem = Left(ObjItem.CurrentSetting, InStr(ObjItem.CurrentSetting, ",")

- 1)

StrValue = Mid(ObjItem.CurrentSetting, InStr(ObjItem.CurrentSetting, ",")

+ 1, 256)

WScript.Echo StrItem + " = " + StrValue

End If

Use the sample scripts in the ZIP file as templates to set a single BIOS setting on a remote computer.

Syntax: cscript.exe SetConfigRemote.vbs [Item] [Value] [Hostname]Example: cscript.exe

SetConfigRemote.vbs WakeOnLAN Disable mattdev-c5

' Set specific BIOS Setting

On Error Resume Next

Dim colItems

If WScript.Arguments.Count <> 3 Then

Lenovo BIOS Setup using Windows Management Instrumentation Deployment Guide