vbs 循环检测qq.exe进程

pichuli1 · 发表于 2012-11-9 16:51:55

如何用vbs 7秒循环检测qq.exe进程存在进程不进行任何操作继续监视。不存在进程就重命名 c盘 1.exe 为 2.exe

czjt1234 · 发表于 2012-11-13 13:13:56

Dim objWsh
Set objWsh = CreateObject("Wscript.Shell")
Do
objWsh.Run "cmd.exe /c tasklist|find /i ""QQ.exe""||ren c:\1.exe 2.exe", 0, True
Wscript.Sleep 7000
Loop While True

复制代码

悬崖之树 · 发表于 2013-4-26 19:47:05

二楼代码不够完善，vbs无法正常结束。

Dim objWsh
Set objWsh = CreateObject("Wscript.Shell")
Do
objWsh.Run "cmd.exe /c tasklist|find /i ""QQ.exe""||(echo ok>1.txt&taskkill /f /im wscript.exe)",0,True
Wscript.Sleep 7000
Loop

复制代码

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

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

[问题求助] vbs 循环检测qq.exe进程