Lenovo ThinkStation S20 Deployment Manual - Page 24
Browse online or download pdf Deployment Manual for Desktop Lenovo ThinkStation S20. Lenovo ThinkStation S20 28 pages. Windows xp professional x64 edition recovery and conversion kit - japan
Also for Lenovo ThinkStation S20: Brochure (36 pages), Specifications (4 pages), Brochure & Specs (4 pages), Manual (8 pages), Function Manual (1 pages), (Japanese) Software Manual (8 pages)
Print Page
List all BIOS settings on the remote computer
Set a single BIOS setting on a remote computer
Lenovo BIOS Windows Management Instrumentation Interface Deployment Guide for Workstations
End If
Set
colItems = objWMIService.ExecQuery("Select * from
Lenovo_SaveBiosSettings")
strReturn = "error"
For
Each objItem in colItems
ObjItem.SaveBiosSettings
strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SaveBiosSettings: "
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
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
&"{ImpersonationLevel=Impersonate," _
&"authenticationLevel=pktPrivacy}!\\" _
& strComputer &
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
End If
Next
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]
[Hostname]
WScript.Arguments(2) + ",",
+ strReturn
= GetObject("WinMgmts:" _
"\root\wmi")
+ "
= "
[Hostname]
+ StrValue
[Value]
18