- ページ 25

デスクトップ Lenovo ThinkCentre M90pのPDF 配備マニュアルをオンラインで閲覧またはダウンロードできます。Lenovo ThinkCentre M90p 32 ページ。 (simplified chinese) power manager deployment guide
Lenovo ThinkCentre M90p にも: 仕様 (4 ページ), 配備マニュアル (44 ページ), 配備マニュアル (44 ページ), 設定マニュアル (40 ページ), (配備ガイド (46 ページ), (イタリア語)配備マニュアル (44 ページ), (ドイツ語)実施マニュアル (46 ページ), (日本語)配備マニュアル (44 ページ), 配備マニュアル (42 ページ)

Lenovo ThinkCentre M90p 配備マニュアル
Set a single BIOS setting on the local computer if a
Administrator password exists
@Copyright Lenovo 2010
WScript.Echo "
SetBiosSetting: "
If strReturn < > "Success" Then
WScript.Quit
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 set a single
BIOS setting on the local computer.
Syntax: cscript.exe SetConfigPassword.vbs [Item]
[Password+Encoding]
Example: cscript.exe SetConfigPassword.vbs "Wake Up on LAN"
Disabled "pass,ascii,us"
'
' Set
specific BIOS Setting
'
On
Error Resume Next
Dim colItems
If WScript.Arguments.Count < > 3 Then
WScript.Echo "SetConfigPassword.vbs
[password+encoding]"
WScript.Quit
End If
strRequest = WScript.Arguments(0) + "," + WScript.Arguments(1) +
";"
strComputer = "LOCALHOST"
Set
objWMIService
&"{ImpersonationLevel=Impersonate}!\\" & strComputer _
&"\root\wmi")
Set
colItems = objWMIService.ExecQuery("Select * from
Lenovo_SetBiosSetting")
For
Each objItem in colItems
ObjItem.SetBiosSetting strRequest, strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SetBiosSetting: "
If strReturn < > "Success" Then
WScript.Quit
End If
Set
colItems = objWMIService.ExecQuery("Select * from
Lenovo_SaveBiosSettings)
+ strReturn
+ strReturn
= GetObject("WinMgmts:"_
+ strReturn
[Value]
[setting]
[value]
' Change as
needed.
17