Lenovo ThinkCentre M90p Посібник з розгортання - Сторінка 29

Переглянути онлайн або завантажити pdf Посібник з розгортання для Робочий стіл Lenovo ThinkCentre M90p. Lenovo ThinkCentre M90p 32 сторінки. (simplified chinese) power manager deployment guide
Також для Lenovo ThinkCentre M90p: Технічні характеристики (4 сторінок), Посібник з розгортання (44 сторінок), Посібник з розгортання (44 сторінок), Посібник з конфігурації (40 сторінок), (Англійська) Посібник з розгортання (46 сторінок), (Італійська) Посібник з розгортання (44 сторінок), (Німецька) Посібник з впровадження (46 сторінок), Посібник з розгортання (японською мовою) (44 сторінок), Посібник з розгортання (42 сторінок)

Lenovo ThinkCentre M90p Посібник з розгортання
Set a Administrator password on a remote computer
when a Administrator password exists
@Copyright Lenovo 2010
&"{ImpersonationLevel=Impersonate," _
&"authenticationLevel=pktPrivacy}!\\" _
&
strComputer &
Set
colItems
=
Lenovo_SetBiosPassword")
strReturn = "error"
For
Each objItem in colItems
ObjItem.SetBiosPassword strRequest, strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SetBiosPassword: "
Use the sample scripts in the ZIP file as templates to set a single
BIOS setting on a remote computer.
Note: You cannot set a password if one does not already exist.
Syntax: cscript.exe SetAdminPasswordRemote.vbs [old password]
[new password] [encoding] [hostname]
Example: cscript.exe SetAdminPasswordRemote.vbs oldpass newpass
"ascii,us" mattdev-c5
'
' Update Administrator password
'
On
Error Resume Next
Dim colItems
If WScript.Arguments.Count < > 4 Then
WScript.Echo
"SetAdminPasswordRemote.vbs
[newpassword] [encoding] [hostname]"
WScript.Quit
End If
strRequest="pap,"+WScript.Arguments(0)+","+ WScript.Arguments(1)
+ ","Wscript.Arguments(2)+";"
strCompter = Wscript.Arguments(3) 'change as needed
Set
objWMIService
&"{ImpersonationLevel=Impersonate," _
&"authenticationLevel=pktPrivacy}!\\" _
&
strComputer &
Set
colItems
=
Lenovo_SetBiosPassword")
strReturn = "error"
For
Each objItem in colItems
ObjItem.SetBiosPassword strRequest, strReturn
Next
WScript.Echo strRequest
WScript.Echo "
SetBiosPassword: "
"\root\wmi")
objWMIService.ExecQuery("Select
+ strReturn
= GetObject("WinMgmts:" _
"\root\wmi")
objWMIService.ExecQuery("Select
+ strReturn
*
from
[oldpassword]
*
from
21