Board logo

标题: [问题求助] VBS如何获取注册表值,并赋值变量。 [打印本页]

作者: q121212    时间: 2015-4-21 21:20     标题: VBS如何获取注册表值,并赋值变量。

如上图,路径为:
HKEY_CURRENT_USER\Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\MuiCache
现在知道数值数据:“飞鸽传书”
怎么才能把此程序的绝对路径(D:\Program Files (x86)\APP\IPMSG.exe)提取出来, 并赋值给一个变量方便之后操作?
求解
作者: apang    时间: 2015-4-21 22:55

  1. const HKCU = &h80000001
  2. const REG_SZ = 1
  3. strPath = "Software\Classes\Local Settings\Software\Microsoft\Windows\Shell\MuiCache"
  4. Set WMI = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\Default:StdRegProv")
  5. WMI.EnumValues HKCU, strPath, arrName, arrType
  6. For i = 0 to UBound(arrType)
  7.         If arrType(i) = REG_SZ Then
  8.                 WMI.GetStringValue HKCU, strPath, arrName(i), strValue
  9.                 If strValue = "飞鸽传书" Then strName = arrName(i) : Exit For
  10.         End If
  11. Next
复制代码

作者: q121212    时间: 2015-4-22 21:45

看不懂啊  能注释一下不
还有点这个运行之后好像没有反应
作者: apang    时间: 2015-4-23 19:23

您想要实现什么样的反应啊?化学反应?物理反应?
我会告诉您vbs实现不了化学反应的么?
作者: q121212    时间: 2015-4-27 11:04

多谢 ~已经用上了   
VBS刚起步 求带飞哈
作者: q121212    时间: 2015-4-27 11:06

后来又用regread实现了判断WIN7还是XP
现在已经实现:通过程序描述来启动程序
规避了不同电脑XX程序安装路径不同导致无法启动的问题
大爱脚本 真心解放双手
作者: ygqiang    时间: 2015-5-15 23:36

后来又用regread实现了判断WIN7还是XP
现在已经实现:通过程序描述来启动程序
规避了不同电脑XX程序安装路 ...
q121212 发表于 2015-4-27 11:06



能否    给出你的具体代码?谢谢了。。




欢迎光临 批处理之家 (http://bathome.net./) Powered by Discuz! 7.2