修改windows本地管理员密码

VBS脚本（缺点：密码部分是明码）

 

修改windows本地管理员密码

 

VBS腳本

——————————————————————————————————————————————

 

Dim oWshNetwork
Set oWshNetwork = WScript.CreateObject("WScript.Network")

Dim strComputer
strComputer = oWshNetwork.ComputerName
'WScript.Echo strComputer

Set objUser = GetObject("WinNT://" & strComputer & "/Administrator, user")
objUser.SetPassword "123"
objUser.SetInfo

 

--------------------------------------------------------------------------------

 

 

 

批處理

---------------------------------------------------------------------------------

 

net users administrator "admin0123456789"

 

---------------------------------------------------------------------------------