论坛 › 已解决问题区 › 高手进来帮我解决这个进程问题~！

liyi-softs 发表于 2008-12-15 13:33:00

高手进来帮我解决这个进程问题~！

翻来翻去，没有找到解决办法！

想判断任务管理器里如果有3个QQ.exe进程以上就结束掉所有的QQ进程。。


请问怎么能实现啊？

[ 本帖最后由 liyi-softs 于 2008-12-15 15:46 编辑 ]

liyi-softs 发表于 2008-12-15 15:46:14

都是路过看风景的。。

汗~！

自己觖决了~·

范统.贾 发表于 2008-12-15 15:58:40

If Not ProcessExists("QQ.exe") Then
        MsgBox(262144, "提示", "没QQ在运行你关闭个什么劲儿哦？")
EndIf
$QQlist = ProcessList("QQ.exe")
If @error Then Return
If $QQlist > 3 Then
                For $i = 1 To $QQlist
                        ProcessClose($QQlist[$i])
                Next
EndIf
MsgBox(262144, "提示", "所有的QQ都已关闭。")

liyi-softs 发表于 2008-12-15 17:39:51

感激这位高手

不知道 if@error then return是什么意思。
有这行生成时会出错。

去掉了可以生成但是    提示所有的QQ都已关闭    时。三个QQ都还在逍遥法外的没被关闭。。

范统.贾 发表于 2008-12-15 17:50:32

_CloseQQ()
Func _CloseQQ()
    If Not ProcessExists("QQ.exe") Then
      MsgBox(262144, "提示", "没QQ在运行你关闭个什么劲儿哦？", 2)
    Else
      $QQlist = ProcessList("QQ.exe")
      If @error Then Return
      If IsArray($QQlist) Then
            If $QQlist > 3 Then
                For $i = 1 To $QQlist
                  ProcessClose($QQlist[$i])
                Next
            EndIf
      EndIf
                MsgBox(262144, "提示", "所有的QQ都已关闭。", 2)
        EndIf
EndFunc
Return 好像函数里才能用.....

[ 本帖最后由 范统.贾 于 2008-12-15 17:57 编辑 ]

范统.贾 发表于 2008-12-15 17:59:51

迷茫~搞混了，好像还会出错，If嵌套太多了。。。

自己再改改吧，主代码没错。

查看完整版本: 高手进来帮我解决这个进程问题~！