VBS脚本监视注册表启动项的增加和删除

VBScript · 发表于 2012-4-26 20:29:18

Dim strComputer
strComputer="."
Set objWMIService=GetObject("winmgmts:\" & strComputer &"\root\default")
Set colEvents=objWMIService.ExecNotificationQuery("Select * from RegistryKeyChangeEvent Where Hive='HKEY_LOCAL_MACHINE' and " & "KeyPath='SOFTWARE\\Microsoft\\Windows\\CurrentVersion\\Run'")
Do
Set objLatestEvent=colEvents.NextEvent
MsgBox "在" & Now & "启动项被更改！",vbExclamation,"注册表防火墙"
Loop

复制代码

http://hangzhou492.blog.51cto.com/67690/40609

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[转贴] VBS脚本监视注册表启动项的增加和删除