用vbscript得到注册表中是否存在某个值

时间:2021-05-22

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

声明:本页内容来源网络,仅供用户参考;我单位不保证亦不表示资料全面及准确无误,也不保证亦不表示这些资料为最新信息,如因任何原因,本网内容或者用户因倚赖本网内容造成任何损失或损害,我单位将不会负任何法律责任。如涉及版权问题,请提交至online#300.cn邮箱联系删除。

相关文章