快捷導(dǎo)航

AutoIT寫的禁止QQ運行的程序代碼

更新時間：2008年06月15日 21:31:36 作者：

autoit的東西，確實不錯，推薦大家學(xué)習(xí)之，最近沒時間，稍后我們一起學(xué)習(xí)

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

相關(guān)文章

AutoIt3和按鍵精靈的功能對比
AutoIt3和按鍵精靈的比較無其他的意思，剛看到，順手轉(zhuǎn)了過來，給想學(xué)AUtoIT的同志看看，以下是國內(nèi)(AutoIT )二位高手的評價（本論壇高手也多，只是一直默默無聞，象幾位版主
2008-06-06
飛信的CMD命令行接口批量發(fā)送信息
最近在用AU3開發(fā)一款用來調(diào)用飛信發(fā)送短信的小東東飛信是個很好的東西,可惜用的人少,很多不厚道的同學(xué)注冊之后就不再登錄了.
2008-09-09
autoit GUI相關(guān)知識
AutoIt 腳本可創(chuàng)建（由窗口及其控件組成的）簡單的圖形用戶界面（GUI）。
2008-06-06
獲取外網(wǎng)IP并發(fā)送到指定的郵箱的腳本
來自小A的源碼，其實用到的全部是AU3自帶的UDF，非常有學(xué)習(xí)的意義！功能：獲取外網(wǎng)IP并將IP發(fā)送到配置文件中定義的郵箱
2012-05-05
autoit3最新漢化版下載
想運行.au3的朋友必備，因這個東西，確實不錯，我們提出程序的最低版本都基本是autoit3
2008-06-06
Aut2Exe編譯au3腳本為可執(zhí)行文件
把AutoIt的.au3腳本文件編譯成可獨立運行的程序當(dāng)然是可實現(xiàn)的，這樣就可以使得編譯后的程序得以在沒有安裝AutoIt（或者說沒有AutoIt3.exe這個解釋程序）的機器上運行。
2008-06-06
Au3截取騰訊天氣的腳本
騰訊的天氣是相當(dāng)?shù)臏恃?而且還有實時天氣, 今天把它給應(yīng)用上了,附上源代碼拋磚引玉.
2008-09-09
autoit InputBox 函數(shù)
顯示以一個輸入框以供用戶輸入數(shù)據(jù)。InputBox ( "標題", "提示信息" [, "默認數(shù)據(jù)" [, "密碼字符" [, 寬度, 高度 [, 左邊, 上邊 [, 超時時間]]]]] )
2008-06-06
QQ向陌生人聊天的autoit腳本
直接輸入對方的qq號即可和對方交談的autoit腳本，沒什么技術(shù)含量，就是需要掌握下autoit的相關(guān)知識
2008-06-06
autoit入門教程小結(jié)
對于聽說過autoit腳本的朋友，下面的入門教程是個不錯的教材，建議大家看看
2008-06-06