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 に答える