Lenovo ThinkPad R500 Manuel de déploiement - Page 27

Parcourez en ligne ou téléchargez le pdf Manuel de déploiement pour {nom_de_la_catégorie} Lenovo ThinkPad R500. Lenovo ThinkPad R500 40 pages. Bios windows management instrumentation interface
Également pour Lenovo ThinkPad R500 : Poster d'installation (2 pages), Manuel de configuration initiale (2 pages), Brochure (4 pages), Spécifications (4 pages), Manuel de déploiement (44 pages), Avis (24 pages), Avis (1 pages), Manuel de déploiement (36 pages), Manuel de l'utilisateur (28 pages)

Lenovo ThinkPad R500 Manuel de déploiement
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: " + strReturn
Set a single BIOS setting on the local computer if a supervisor password
exists
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 WakeOnLAN Disable pass,ascii,us
'
' Set specific BIOS Setting
'
On Error Resume Next
Dim colItems
If WScript.Arguments.Count <> 3 Then
WScript.Echo "SetConfigPassword.vbs [setting] [value] [password + encoding]"
WScript.Quit
End If
strRequest = WScript.Arguments(0) + "," + WScript.Arguments(1) + "," +
WScript.Arguments(2) + ";"
strComputer = "LOCALHOST"
Set objWMIService = 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: " + strReturn
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 WScript.Arguments(2) + ";", strReturn
Next
' Change as needed.
Appendix A. Sample Visual Basic scripts for configuring BIOS settings
19