Lenovo ThinkStation D20 Dağıtım Kılavuzu - Sayfa 23

Masaüstü Lenovo ThinkStation D20 için çevrimiçi göz atın veya pdf Dağıtım Kılavuzu indirin. Lenovo ThinkStation D20 28 sayfaları. Windows xp professional x64 edition recovery and conversion kit - japan
Ayrıca Lenovo ThinkStation D20 için: Broşür (36 sayfalar), Teknik Özellikler (4 sayfalar), Broşür ve Teknik Özellikler (4 sayfalar), Manuel (8 sayfalar), İşlev Kılavuzu (1 sayfalar), (Japonca) Yazılım Kılavuzu (8 sayfalar)

Sayfayı Yazdır
Lenovo ThinkStation D20 Dağıtım Kılavuzu
Set a single BIOS setting on the local computer if a
Administration 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 if a supervisor password 
exists. 
Syntax: cscript.exe SetConfigPassword.vbs [Item] [Value]
[Password +
Encoding]
Example: cscript.exe SetConfigPassword.vbs "Wake 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"
objWMISevice = GetObject("WinMgmts:" _
&"{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
+ strReturn
+ strReturn
[setting]
' Change as
needed.
+ strReturn
[value]
17