用vbscript得到注册表中是否存在某个值 |
|
问： 嗨，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 我们先将注册表路径和注册表值隐藏在一对变量中，然后调用 GetStringValue 方法 。注意这个方法的以下四个参数：我们的常量 HKEY_LOCAL_MACHINE；变量 strPath（表示注册表路径）；变量 strValueName（表示我们要读取的注册表值）；以及 strValue 。strValue 即我们的输出参数：注册表中记录的实际字符串值将会存储在 strValue 中，并返回给我们 。 根据以下情况，我们就可以知道注册表值是否存在：如果 strValue 为 Null，则这个值不存在 。我们对很多注册表值都使用了这个方法，看来每次都有效 。它对 REG_DWORD 值也有效，当然，您必须使用 GetDWORDValue 方法才能读取这种值 。有关如何使用 WMI 处理注册表的详细信息，请参阅“Microsoft Windows 2000 脚本编写”中的 “注册表”一章 。 现在，我们知道您在想什么：您在想，“好吧，那如果我创建了一个空白的注册表值又会怎样？是否输出参数仍会作为 Null 返回，即使注册表值存在？”信不信由你，情况是不同的 。相反，空白的注册表值会作为“empty”返回，也就是说这个值等于空字符串 ("") 。我们认识到这个问题可能会带来困扰，在这种情况下，无（空字符串）并不等于无（Null 值） 。空白意味着注册表值存在，但是这个值为空白；而 Null 则意味着这个值不存在 。 上面已经说过，我们随意尝试对各种类型的注册表值使用过这个方法，看来好像每次都有效 。如果您遇到这个方法无效的情况，请让我们知道 。 |
