寻求帮助，通过脚本修改远程windows管理员密码！

ChangePassword.vbs脚本程序代码如下：Option ExplicitConst wbemImpersonationLevelImpersonate = 3
Const wbemAuthenticationLevelPktPrivacy = 6
Const wbemFlagReturnImmediately = &h10
Const wbemFlagForwardOnly = &h20
Const wbemConnectFlagUseMaxWait = 128Dim user,username,password,computernamecomputername = WScript.Arguments(0)
username = WScript.Arguments(1)
password = WScript.Arguments(2)
Set user = GetObject("WinNT://" & computername & "/" & username &",user")
user.setpassword password
user.setinfo
if Err.number <> 0 Then
WScript.Echo "Error Occurred " & Err.number
WScript.Echo Err.Description
else
WScript.Echo "SUCCESS"
End if但是在CMD窗口里执行后却总是提示 没有权限：‘GetObject’
--------------------------------------------------------------------------------
D:\Program Files\PMP\scripts>cscript ChangePassword.vbs unisoft-look administrat
or 123456
Microsoft (R) Windows Script Host Version 5.6
版权所有(C) Microsoft Corporation 1996-2001。保留所有权利。D:\Program Files\PMP\scripts\ChangePassword.vbs(14, 1) Microsoft VBScript 运行时
错误: 没有权限: 'GetObject'
--------------------------------------------------------------------------------