Lenovo ThinkCentre M90p Manuale d'uso - Pagina 23

Sfoglia online o scarica il pdf Manuale d'uso per Desktop Lenovo ThinkCentre M90p. Lenovo ThinkCentre M90p 32. (simplified chinese) power manager deployment guide
Anche per Lenovo ThinkCentre M90p: Specifiche tecniche (4 pagine), Manuale d'uso (44 pagine), Manuale d'uso (44 pagine), Manuale di configurazione (40 pagine), (inglese) Guida all'installazione (46 pagine), Manuale d'uso (italiano) (44 pagine), (Tedesco) Manuale di implementazione (46 pagine), Manuale d'uso (giapponese) (44 pagine), Manuale d'uso (42 pagine)

Lenovo ThinkCentre M90p Manuale d'uso
Appendix A. Sample Visual Basic scripts for
configuring BIOS settings

Restore default settings

@Copyright Lenovo 2010
The Visual Basic command line scripts in the ZIP file are examples
that you may find helpful when configuring BIOS settings.
The scripts in the ZIP file can be used as-is on Windows XP ,
Windows Vista or Windows 7 to modify BIOS settings on your
Lenovo computer. The scripts can be executed on a command
prompt using the cscript.exe utility. On Windows Vista, you must
run the scripts from an administrator command prompt.
Note: The scripts in this appendix are for reference only. To copy
and paste scripts, use the scripts in the ZIP file. Pay attention to that
symbol ";" is treated as the end of paramter in script, so make sure
each method input paramter in script will end with ";"
Use the example scripts in the ZIP file as templates to restore default
settings on the local computer.
Syntax: cscript.exe LoadDefaults.vbs
Example: cscript.exe LoadDefaults.vbs
'
' Load default BIOS settings
'
On Error Resume Next
Dim colItems
strComputer = "LOCALHOST"
Set
objWMIService = GetObject("WinMgmts:" _
&"{ImpersonationLevel=Impersonate}!\\" & strComputer _
&"\root\wmi")
Set colItems = objWMIService.ExecQuery("Select * from
Lenovo_LoadDefaultSettings")
strReturn = "error"
For Each objItem in colItems
ObjItem.LoadDefaultSettings ";", strReturn
Next
WScript.Echo "
LoadDefaultSettings: " + 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 ";", strReturn
Next
WScript.Echo "
SaveBiosSettings: " + strReturn
'Change as needed
15