vbscript权限被拒绝：getobject

Question

我正在尝试从本地系统中的vbscript执行位于服务器中的批处理文件。

下面的代码在访问GETOBJECT时会抛出权限被拒绝

strDomain = "SBICAD"
strComputer = "10.29.83.22"
Set objSWbemLocator = CreateObject("WbemScripting.SWbemLocator")
Set objSWbemServices = objSWbemLocator.ConnectServer(strComputer, _
"root\cimv2", _
 "ec12345", _
"sorry@1", _
 "MS_409", _
 "ntlmdomain:" + strDomain)

        objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!" & _
                        "\\" & strComputer & _
                        "\root\cimv2:Win32_Process")



result = objWMIService.Create("C:\script\checkremote.bat", Null, Null,process)


Msgbox result 
WScript.Quit

反正有没有在GetObject上传递我的服务器登录凭据？

注意：用户ec12345具有管理员权限。

Answer 1

您不需要使用GetObject方法，因为您已经与ConnectServer函数连接。 因此，您只需使用将使用相同连接执行的ExecQuery方法。

Set objWMIService = objSWbemServices.ExecQuery("Select * From Win32_Process")