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

liyi-softs

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

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


请问怎么能实现啊？

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

liyi-softs

都是路过看风景的。。

汗~！

自己觖决了~·

范统.贾

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

liyi-softs

感激这位高手

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

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

范统.贾

_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[0][0] > 3 Then
                For $i = 1 To $QQlist[0][0]
                    ProcessClose($QQlist[$i][1])
                Next
            EndIf
        EndIf
                MsgBox(262144, "提示", "所有的QQ都已关闭。", 2)
        EndIf
EndFunc

Return 好像函数里才能用.....

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

范统.贾

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

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