无法使用WMI远程查询Windows 7注册表

时间:2013-08-26 14:42:13

标签: vbscript registry wmi

我使用以下VB脚本使用WMI远程查询注册表值。它能够连接,但无法获得价值。

Option Explicit

Dim strComputer
Dim strUser, strPassword
Dim objSWbemLocator, objSWbemServices, objReg
Dim strKeyPath, strEntryName, strValue

Const HKEY_LOCAL_MACHINE = &H80000002

strComputer = "192.168.1.10"

strUser = "username"
strPassword = "password"

Set objSWbemLocator = CreateObject("wbemScripting.SwbemLocator")
Set objSWbemServices = objSWbemLocator.ConnectServer _
(strComputer, "root\default", strUser, strPassword)

Set objReg = objSWbemServices.Get("StdRegProv")

strKeyPath = "SYSTEM\CurrentControlSet\services\eventlog\Application"
strEntryName = "MaxSize"
objReg.GetDWORDValue HKEY_LOCAL_MACHINE, strKeyPath, strEntryName, dwValue
Wscript.Echo dwValue

它返回:Microsoft VBscript运行时错误:变量未定义:'dwValue'。这意味着它没有获得目标机器的价值。我检查了目标机器,dword值确实存在。

我按如下方式配置了目标机器

  1. 关闭防火墙
  2. 运行“wmimgmt.msc” - > WMI控制 - >性能         为所有用户启用“远程启用”,为所有用户启用其子命名空间。
  3. 启动服务“远程注册表”
  4. 我花了好几天才解决这个问题而且无法理解。请帮我检查脚本是否有问题,或者是目标机器的配置。非常感谢你。

0 个答案:

没有答案