问:
嗨,Scripting Guy!如何知道远程计算机上的注册表中是否存在某个值?
-- AL
答:
嗨,AL。完全披露时间:尽管我们叫做 Scripting Guy,但这并不表示我们了解有关脚本编写的一切事情。这个问题就是一个很好的例证。第一次看到这个问题时,我们认为:“好吧,WMI 中显然有某种 If Exists 方法可以实现这个目的。”但当我们发现其中并没有这样的方法时,知道我们有多吃惊么?事实上,我们找不到任何可以检查注册表中是否存在某个值的方法。我们甚至——惭愧!——去查阅文档,以为我们可能遗漏了什么。运气当然不会那么好。
在我们找不到 If Exists 方法后,我们想:“好吧,那我们就试着读取这个值。当然了,尝试读取一个不存在的值会触发一个错误。然后我们就可以捕获这个错误,并确定这个值是否存在。”
大家知道,如果您使用 WSH 的 RegRead 方法来读取一个不存在的值,那么就会触发一个错误。但 RegRead 方法只对本地计算机有效,您不能对远程计算机使用这个方法。因此您需要使用 WMI。然后,猜一猜会出现什么情况呢:如果您使用 WMI 尝试读取一个不存在的值,根本不会产生任何错误。相反,WMI 会继续运行,就好像没有错误发生一样。真是不可救药。
但后来我们发现了一些事情。当您使用 WMI 来读取注册表时,这个值会作为“输出参数”返回。当我们检查这个输出参数的实际值时,我们发现如果您尝试读取的值不存在,那么您就会得到 Null。这就是说,我们所要做的就是检查 Null 值,这样我们就可以知道这个注册表值存不存在。
明白了吗?以下示例脚本查找注册表值 HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\Test Value:
复制代码 代码如下:
Const HKEY_LOCAL_MACHINE = &H80000002
strComputer = "."
Set objRegistry = GetObject("winmgmts:\\" & _
strComputer & "\root\default:StdRegProv")
strKeyPath = "SOFTWARE\Microsoft\Windows NT\CurrentVersion"
strValueName = "Test Value"
objRegistry.GetStringValue HKEY_LOCAL_MACHINE,strKeyPath,strValueName,strValue
If IsNull(strValue) Then
Wscript.Echo "The registry key does not exist."
Else
Wscript.Echo "The registry key exists."
End If
如您所见,我们首先将常量 HKEY_LOCAL_MACHINE 设置为 &H80000002;等一会我们将使用这个值来连接注册表的 HKEY_LOCAL_MACHINE 部分。然后,我们连接 WMI 服务,并连接 StdRegProv 类(位于 root\default namespace 中)。
我们先将注册表路径和注册表值隐藏在一对变量中,然后调用 GetStringValue 方法。注意这个方法的以下四个参数:我们的常量 HKEY_LOCAL_MACHINE;变量 strPath(表示注册表路径);变量 strValueName(表示我们要读取的注册表值);以及 strValue。strValue 即我们的输出参数:注册表中记录的实际字符串值将会存储在 strValue 中,并返回给我们。
根据以下情况,我们就可以知道注册表值是否存在:如果 strValue 为 Null,则这个值不存在。我们对很多注册表值都使用了这个方法,看来每次都有效。它对 REG_DWORD 值也有效,当然,您必须使用 GetDWORDValue 方法才能读取这种值。有关如何使用 WMI 处理注册表的详细信息,请参阅“Microsoft Windows 2000 脚本编写”中的 “注册表”一章。
现在,我们知道您在想什么:您在想,“好吧,那如果我创建了一个空白的注册表值又会怎样?是否输出参数仍会作为 Null 返回,即使注册表值存在?”信不信由你,情况是不同的。相反,空白的注册表值会作为“empty”返回,也就是说这个值等于空字符串 ("")。我们认识到这个问题可能会带来困扰,在这种情况下,无(空字符串)并不等于无(Null 值)。空白意味着注册表值存在,但是这个值为空白;而 Null 则意味着这个值不存在。
上面已经说过,我们随意尝试对各种类型的注册表值使用过这个方法,看来好像每次都有效。如果您遇到这个方法无效的情况,请让我们知道。