Lenovo ThinkPad R500 Panduan Penyebaran - Halaman 27

Jelajahi secara online atau unduh pdf Panduan Penyebaran untuk Desktop Lenovo ThinkPad R500. Lenovo ThinkPad R500 40 halaman. Bios windows management instrumentation interface
Juga untuk Lenovo ThinkPad R500: Poster Pengaturan (2 halaman), Panduan Pengaturan Awal (2 halaman), Brosur (4 halaman), Spesifikasi (4 halaman), Panduan Penyebaran (44 halaman), Pemberitahuan (24 halaman), Pemberitahuan (1 halaman), Panduan Penyebaran (36 halaman), Panduan Pengguna (28 halaman)

Lenovo ThinkPad R500 Panduan Penyebaran
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