AutoIT写的禁止QQ运行的程序代码(怎么禁止qq运行)难以置信

随心笔谈2年前发布 admin
205 0 0

文章摘要

这段代码的主要功能是通过系统监控工具实时检测并终止名为QQ.exe的进程。首先,代码检查该进程是否存在,并获取其进程ID后将其关闭。接着,代码利用Winmgmts系统命令监控系统中运行的所有Win32进程,当检测到QQ进程时,会调用终止进程的方法。整个过程旨在确保QQ进程的正常 terminate,避免潜在的安全风险或系统运行异常。


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

© 版权声明

相关文章