VBScript 遠程 WMI 調用“錯誤：0 '權限被拒絕：'GetObject”

Question

我在嘗試進行遠程 WMI 調用時收到以下錯誤：

無法解析腳本。 錯誤：來源：'Microsoft VBScript 運行時錯誤' 第 4 行字符：1 錯誤：0 '權限被拒絕：'GetObject''

如果我運行以下代碼指向我的本地機器，我不會收到任何錯誤。 但是，當我運行指向遠程機器的代碼時，出現上述錯誤。

strComputer = "COMPUTER-X"
strService = "Netlogon"

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

Set colRunningServices = objWMIService.ExecQuery("Select * from WIN32_Service")

For Each objService in colRunningServices
    if objService.DisplayName = strService then
        if objService.State = "Running" then
            Context.SetValue 1
        else
            Context.SetValue 0
        End If
    Else
    End If
Next

我嘗試了以下方法：

1. 關閉遠程機器上的防火牆。
2. 在遠程計算機上將 HKLM\Software\Policies\Microsoft\Windows NT\RPC "RestrictRemoteClients" 從 2 更改為 1
3. 更改組策略 Computer Configuration\Admistrative Templates\System\RPC“Restrict Unauthenticated RPC clients”和“Enable RPC Endpoint Mapper Client Authenticatin”設置。

任何幫助，將不勝感激！

Answer 1

執行查詢的計算機使用計算機帳戶 (CONTOSCO\COMPUTER-X) 連接到遠程計算機，但它沒有執行 winmgmts 命令的正確權限。 將計算機帳戶 (CONTOSCO\COMPUTER-X) 添加到本地管理員組后，查詢執行沒有問題！

參考： https://learn.microsoft.com/en-us/windows/win32/wmisdk/user-account-control-and-wmi