Lenovo ThinkStation D20 Deployment Manual - Page 26

Browse online or download pdf Deployment Manual for Desktop Lenovo ThinkStation D20. Lenovo ThinkStation D20 28 pages. Windows xp professional x64 edition recovery and conversion kit - japan
Also for Lenovo ThinkStation D20: Brochure (36 pages), Specifications (4 pages), Brochure & Specs (4 pages), Manual (8 pages), Function Manual (1 pages), (Japanese) Software Manual (8 pages)

Lenovo ThinkStation D20 Deployment Manual
Lenovo BIOS Windows Management Instrumentation Interface Deployment Guide for Workstations
'
On
Error Resume Next
Dim colItems
If WScript.Arguments.Count <> 4 Then
WScript.Echo "SetConfigPasswordRemote.vbs [setting]
[password + encoding] [hostname]"
WScript.Quit
End If
strRequest = WScript.Arguments(0) + "," + WScript.Arguments(1) +
","
strComputer = WScript.Arguments(3)
Set
objWMIService
&"{ImpersonationLevel=Impersonate," _
&"authenticationLevel=pktPrivacy}!\\" _
&
strComputer &
Set
colItems
=
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
=
Lenovo_SaveBiosSettings")
strReturn = "error"
For
Each objItem in colItems
ObjItem.SaveBiosSettings WScript.Arguments(2)+",",
Next
WScript.Echo strRequest
WScript.Echo " SaveBiosSettings: " + strReturn
= GetObject("WinMgmts:" _
"\root\wmi")
objWMIService.ExecQuery("Select
+ strReturn
objWMIService.ExecQuery("Select
[value]
*
from
*
from
strReturn
20