众前辈高人请指点下这个脚本错在哪了？

微雨湿黄昏 · 发表于 2011-1-10 20:00:03

if ProcessExists("qq.exe") then
$QQPID = ProcessExists("qq.exe")
ProcessClose ($QQPID)
endif

===============================================================
Set objWMIService = GetObject("winmgmts:" & "{impersonationLevel=impersonate}!\\.\root\cimv2")
Set colMonitoredProcesses = objWMIService.ExecNotificationQuery("select * from __instancecreationevent within 1 where TargetInstance isa 'Win32_Process'")
i = 0
Do While i = 0
Set objLatestProcess = colMonitoredProcesses.NextEvent
strPrs = LCase(objLatestProcess.TargetInstance.Name)
If InStr(strPrs,"qq") <> "0" Then
objLatestProcess.TargetInstance.Terminate
End If
Set objLatestProcess = Nothing
Loop
这个小脚本的功能据说是禁止QQ运行的。

微雨湿黄昏 · 发表于 2011-1-10 20:01:09

先给自己顶一个，坐等高手指导。

sxd · 发表于 2011-1-10 21:14:18

错在这个不是au3的

gzh888666 · 发表于 2011-1-10 22:07:22

看不懂哟！~

微雨湿黄昏 · 发表于 2011-1-10 22:24:59

这不是吗，我是在脚本之间里看到的啊，例子啊

sxd · 发表于 2011-1-10 23:25:42

这是vbs

5i5wei · 发表于 2011-1-11 21:04:17

这个是vbs 可以改改au3 的论坛有很多例子的多Google下

renren · 发表于 2011-1-13 12:36:36

无语了`不如直接`用AU3结束进程的函数还要WMI 加进去楼主看几次`中文帮助吧`

3mile · 发表于 2011-1-13 15:00:57

哈哈，看到这句忍俊不禁啊！
Do While i = 0 ，这是什么玩意儿？

微雨湿黄昏 · 发表于 2011-1-13 20:30:23

谢谢诸位了，我回头去网上查查资料，新手

		自动登录	找回密码
密码			加入

[AU3基础] 众前辈高人请指点下这个脚本错在哪了？

相关帖子