- ページ 24
デスクトップ Lenovo ThinkStation S20のPDF 配備マニュアルをオンラインで閲覧またはダウンロードできます。Lenovo ThinkStation S20 28 ページ。 Windows xp professional x64 edition recovery and conversion kit - japan
Lenovo ThinkStation S20 にも： パンフレット (36 ページ), 仕様 (4 ページ), パンフレット＆スペック (4 ページ), マニュアル (8 ページ), 機能マニュアル (1 ページ), (ソフトウェアマニュアル (8 ページ)
ページを印刷する
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