[注册表类] [已解决]批处理监视注册表项

http://www.bathome.net/thread-3747-1-1.html

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

1楼 跳转到 » 倒序看帖

打印

字体大小: tT

发表于 2012-6-3 19:52 | 只看该作者

[注册表类] [已解决]批处理监视注册表项

本帖最后由 wh1234567 于 2012-6-16 14:44 编辑

当监视某个注册表项名称数值为29时就执行我的命令，如果监视数值不是29就不执行命令，如何写？
例如
注册表项"HKEY_LOCAL_MACHINE\333" 里右边的名称"444" 里的数值29

我的命令放在下面

1 评分人数

zqz0012005: 感谢给帖子标题标注[已解决]字样PB + 2

gawk

少将

Rank: 8 Rank: 8

帖子: 1088
积分: 5421
技术: 98
捐助: 30
注册时间: 2011-10-9

2楼

发表于 2012-6-4 08:55 | 只看该作者

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

3楼

发表于 2012-6-4 11:10 | 只看该作者

这个看不懂啊

tz_being

三级士官

Rank: 3 Rank: 3

帖子: 83
积分: 220
技术: 5
捐助: 0
注册时间: 2009-11-14

4楼

发表于 2012-6-4 13:16 | 只看该作者

别整HKLM\333，那个地方建立不了新项，就整HKLM\Software\333吧。

for /f "skip=4 tokens=1,2,*" %%i in ('reg query "HKLM\Software\333" /v 444') do set Ver=%%k
if not %Ver%==29 goto :eof
::你的命令
echo OK!Ver is 29.
pause
复制代码

gawk

少将

Rank: 8 Rank: 8

帖子: 1088
积分: 5421
技术: 98
捐助: 30
注册时间: 2011-10-9

5楼

发表于 2012-6-4 13:39 | 只看该作者

回复 3# wh1234567

边看边试，就懂了。

powerbat

大校

Rank: 7 Rank: 7 Rank: 7

帖子: 752
积分: 4553
技术: 139
捐助: 0
注册时间: 2010-8-24

6楼

发表于 2012-6-4 13:50 | 只看该作者

你的目的是监视还是查询？

script56
新加坡Google

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

7楼

发表于 2012-6-4 15:17 | 只看该作者

本帖最后由 wh1234567 于 2012-6-4 15:19 编辑

回复 4# tz_being

不行，闪了下就没了
另外说下，不是建立新项，而是监视那里的数值29

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

8楼

发表于 2012-6-4 15:17 | 只看该作者

回复 6# powerbat

是监视

powerbat

大校

Rank: 7 Rank: 7 Rank: 7

帖子: 752
积分: 4553
技术: 139
捐助: 0
注册时间: 2010-8-24

9楼

发表于 2012-6-4 16:24 | 只看该作者

回复 8# wh1234567
vbs

Hive = "HKEY_LOCAL_MACHINE"
KeyPath = "Software\333"
ValueName = "444"

Set ws = CreateObject("WScript.Shell")
Set Sink = WScript.CreateObject("WbemScripting.SWbemSink", "SINK_")
Set objWMIServices = GetObject("winmgmts:" & _
    "{impersonationLevel=impersonate}!\\.\root\default")
objWMIServices.ExecNotificationQueryAsync Sink, _
    "Select * from RegistryValueChangeEvent Where " & _
    "Hive = '"&Hive&"' and " & _
    "KeyPath = '"&Replace(KeyPath,"\","\\")&"' and " & _
    "ValueName = '"&ValueName&"'"
WScript.Echo "Listening for Registry Change Events..." & vbCrLf
Do : WScript.Sleep 1000 : Loop

Sub SINK_OnObjectReady(wmiObject, wmiAsyncContext) 
    Value = ws.RegRead(Hive&"\"&KeyPath&"\"&ValueName)
    'WScript.Echo Value
    if CStr(Value)="29" then ws.Run "a.bat",0
End Sub
复制代码

1 评分人数

zqz0012005: 乐于助人技术 + 1

script56
新加坡Google

tz_being

三级士官

Rank: 3 Rank: 3

帖子: 83
积分: 220
技术: 5
捐助: 0
注册时间: 2009-11-14

10楼

发表于 2012-6-4 17:48 | 只看该作者

回复 tz_being

不行，闪了下就没了
另外说下，不是建立新项，而是监视那里的数值29
wh1234567 发表于 2012-6-4 15:17

你注册表的这个地方HKLM\Software\333没有数值，当然自动退出了；如果有数值29就运行你的命令了

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

11楼

发表于 2012-6-4 19:08 | 只看该作者

，

本帖最后由 wh1234567 于 2012-6-5 23:42 编辑

回复 10# tz_being

有数值的，数值就是29也退出了不能执行a.bat

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

12楼

发表于 2012-6-4 19:11 | 只看该作者

本帖最后由 wh1234567 于 2012-6-4 19:18 编辑

回复 9# powerbat

我的命令放到哪，提示是英文看不懂啊
我的命令是a.bat这个吗？是代码不行还是我不会使用

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

13楼

发表于 2012-6-4 19:16 | 只看该作者

最好的办法是不是在进程里全自动监视？

powerbat

大校

Rank: 7 Rank: 7 Rank: 7

帖子: 752
积分: 4553
技术: 139
捐助: 0
注册时间: 2010-8-24

14楼

发表于 2012-6-5 21:57 | 只看该作者

回复 12# wh1234567

对。a.bat可用其他程序代替。

script56
新加坡Google

Rank: 5 Rank: 5

帖子: 505
积分: 1230
技术: 1
捐助: 0
注册时间: 2009-5-28

15楼

发表于 2012-6-5 23:41 | 只看该作者

能不能弄成在进程里全自动监视的那种？当监视到数值变化到29就自动执行a.bat，不是运行一次监视一次，而是运行后就在进程里全自动监视