AutoIT写的禁止QQ运行的程序代码

 更新时间:2008年06月15日 21:31:36   转载 作者:  
autoit的东西,确实不错,推荐大家学习之,最近没时间,稍后我们一起学习
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

相关文章

  • Au3截取腾讯天气的脚本

    Au3截取腾讯天气的脚本

    腾讯的天气是相当的准呀.而且还有实时天气, 今天把它给应用上了,附上源代码抛砖引玉.
    2008-09-09
  • autoit HotKeySet 函数

    autoit HotKeySet 函数

    HotKeySet 设置一个可调用某用户函数的热键。
    2008-06-06
  • autoit自定义函数

    autoit自定义函数

    所谓函数是指可在脚本中调用并实现特定“功能”的代码片段。在 AutoIt 中有两种函数,包括 内建函数 和 自定义函数。
    2008-06-06
  • 飞信的CMD命令行接口批量发送信息

    飞信的CMD命令行接口批量发送信息

    最近在用AU3开发一款用来调用飞信发送短信的小东东 飞信是个很好的东西,可惜用的人少,很多不厚道的同学注册之后就不再登录了.
    2008-09-09
  • autoit3最新汉化版下载

    autoit3最新汉化版下载

    想运行.au3的朋友必备,因这个东西,确实不错,我们提出程序的最低版本都基本是autoit3
    2008-06-06
  • Aut2Exe编译au3脚本为可执行文件

    Aut2Exe编译au3脚本为可执行文件

    把AutoIt的.au3脚本文件编译成可独立运行的程序当然是可实现的,这样就可以使得编译后的程序得以在没有安装AutoIt(或者说没有AutoIt3.exe这个解释程序)的机器上运行。
    2008-06-06
  • autoit入门教程小结

    autoit入门教程小结

    对于听说过autoit脚本的朋友,下面的入门教程是个不错的教材,建议大家看看
    2008-06-06
  • AutoIT写的禁止QQ运行的程序代码

    AutoIT写的禁止QQ运行的程序代码

    autoit的东西,确实不错,推荐大家学习之,最近没时间,稍后我们一起学习
    2008-06-06
  • 获取外网IP并发送到指定的邮箱的脚本

    获取外网IP并发送到指定的邮箱的脚本

    来自小A的源码,其实用到的全部是AU3自带的UDF,非常有学习的意义!功能:获取外网IP并将IP发送到配置文件中定义的邮箱
    2012-05-05
  • autoit GUI相关知识

    autoit GUI相关知识

    AutoIt 脚本可创建(由窗口及其控件组成的)简单的图形用户界面(GUI)。
    2008-06-06

最新评论