0

我正在尝试从本地系统中的 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 具有管理员权限。

4

1 回答 1

2

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

Set objWMIService = objSWbemServices.ExecQuery("Select * From Win32_Process")
于 2014-01-29T19:12:36.930 回答