嗚嗚 ~~~~(>_<)~~~~ 又像前晚那樣,搞了個通宵...... 花了基本上一個通宵的時間..終于把這個程序搞好了.... 看著自己的程序在屏幕上閃動... 這把心情呀...無法比喻的開心!!!
程序介紹
本程序可設定在指定時間間隔內檢測指定的某程
序進程,若發現指定的程序運行,系統就會執行指定的
操作!可設定發現程序的進程后"重啟\關機\注銷\"幾個動作!
使用舉例:你的男\女友經常沉迷于某個游戲,你
叫她少玩,但對方死活不聽你話! 咋辦咧?直接把游戲
刪除了吧..又怕被K, 設置電腦密碼吧..又不太厚道!
所以呢!本程序就可以出馬了,讓你既不會被K,又不會被說不厚道.....
例:用本程序指定了監視"qq.exe"進程(騰訊QQ)
每隔"1"分鐘掃描一次系統進程,發現該進程后執行"注
銷"動作! 那么,當你運行了QQ之后,在一分鐘內,你的
電腦將會注銷..重新進入系統后,只要再打開QQ,系統又會注銷... ---以 下 是 程 序 代 碼--- (把下面紅色的文字全部復制到記事本里,然后保存,再把后綴名改為BAT后即可運行) @echo off
title 監視進程...
MODE con: COLS=50 LINES=19
color 0a
::批處理裝飾 echo 設置計劃任務服務啟動類型為自動...
sc config schedule start= auto >nul 2>nul
::設置計劃任務服務狀態為自動 echo 開啟計劃任務服務...
net start schedule /y >nul 2>nul
::開啟計劃任務服務 for /l %%i in (1,1,6) do echo.
echo 當前用戶名為:%username%
echo 此程序的運行需要當前用戶名及
echo 其密碼!請輸入此用戶的密碼!
echo 若密碼為空則直接按回車鍵即可。
echo.
set/p password= 密碼:
if not defined password (
set password=""
echo.
echo Win xp 系統中默認不允許空密碼的賬戶
echo 創建此類型的計劃任務!正在修改此限制...
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v limitblankpassworduse /t REG_DWORD /d 00000000 /f >nul
::修改組策略中"賬戶:使用空密碼的本地賬戶只允許進行控制臺登陸"處為"已停用"
ping 127.1 -n 5 >nul 2>nul
)
:start
MODE con: COLS=50 LINES=20
cls
echo.
echo 程序介紹
echo 本程序可設定在指定時間間隔內檢測指定的某程
echo 序進程,若發現指定的程序運行,系統就會執行指定的
echo 操作!可設定發現程序的進程后"重啟\關機\注銷\"幾
echo 個動作!
echo 使用舉例:你的男\女友經常沉迷于某個游戲,你
echo 叫她少玩,但對方死活不聽你話! 咋辦咧?直接把游戲
echo 刪除了吧..又怕被K, 設置電腦密碼吧..又不太厚道!
echo 所以呢!本程序就可以出馬了,讓你既不會被K,又不會
echo 被說不厚道.....
echo 例:用本程序指定了監視"qq.exe"進程(騰訊QQ)
echo 每隔"1"分鐘掃描一次系統進程,發現該進程后執行"注
echo 銷"動作! 那么,當你運行了QQ之后,在一分鐘內,你的
echo 電腦將會注銷..重新進入系統后,只要再打開QQ,系統
echo 又會注銷...
echo.
echo 1、創建任務 2、刪除任務 3、查看已有任務
echo 4、退出程序 5、以后不用此程序..
set /p xz=請選擇:
if "%xz%"=="1" goto chj
if "%xz%"=="2" goto del
if "%xz%"=="3" goto chk
if "%xz%"=="4" exit
if "%xz%"=="5" goto gb
if errorlevel 1 goto start
if %xz% geq 6 goto start
:chj
set /p rwm=任務名(隨意輸入):
set /p chx=要監測的程序進程名:
set /p shj=掃描系統進程頻率(單位:分鐘):
set /p dz=發現進程時執行動作(1.重啟 2.關機 3.注銷):
if %dz%==1 set dz=r
if %dz%==2 set dz=s
if %dz%==3 set dz=l
echo CreateObject("WScript.Shell").Run "cmd /c Monitoring.bat",0 >%windir%\system32\Monitoring.vbs
echo tasklist ^| find /I "%chx%" ^>nul ^&^& shutdown -%dz% -t 0 >>%windir%\system32\Monitoring.bat
::在%windir%\system32下生成Monitoring.vbs 和 Monitoring.bat
::Monitoring.vbs的作用:隱藏方式運行Monitoring.bat
::Monitoring.bat的作用:用tasklist命令提取出進程名,用"|"命令管道符把tasklist命令的結果傳遞給find命令,
::再用find命令查找QQ.EXE字符,find程序查找到"QQ.EXE"就執行相關"shutdown"命令,若查找不到則執行"exit"退出.
schtasks /create /tn "%rwm%" /tr %windir%\system32\Monitoring.vbs /sc minute /mo %shj% /ru "%username%" /rp %password% >nul 2>nul
::此句是本程序核心!每隔指定的時間運行一次指定的程序!
if %dz%==r set dz2=重啟
if %dz%==s set dz2=關機
if %dz%==l set dz2=注銷
echo 在 %date% %time% 創建名為 %rwm% 的任務,每 %shj% 分鐘掃描一次 %chx% 進程,若發現,則 %dz2%! >>%windir%\system32\Monitoring.log
echo.
echo 創建 %rwm% 任務成功!
echo 按任意鍵返回主界面! & pause >nul
goto start
:chk
cls
echo.
if exist %windir%\system32\Monitoring.log (
MODE con: COLS=110 LINES=19
type %windir%\system32\Monitoring.log
) else (
cls
MODE con: COLS=50 LINES=20
for /l %%i in (1,1,9) do echo.
echo 還沒創建過任何任務哦!
for /l %%i in (1,1,5) do echo.
)
echo 按任意鍵返回... & pause>nul & goto start
:del
if exist %windir%\system32\Monitoring.log (
echo.
echo y|schtasks /tn * /delete
del %windir%\system32\Monitoring.log
del %windir%\system32\Monitoring.vbs
del %windir%\system32\Monitoring.bat
echo.
echo 刪除完畢!
echo 按任意鍵返回... & pause>nul & goto start
) else (
cls
for /l %%i in (1,1,9) do echo.
echo 還沒創建過任何任務哦!
for /l %%i in (1,1,5) do echo.
)
echo 按任意鍵返回... & pause>nul & goto start
:gb
echo.
echo 刪除已創建的計劃任務...
echo y|schtasks /tn * /delete >nul 2>nul
echo 刪除此程序生成的文件...
del %windir%\system32\Monitoring.log >nul 2>nul
del %windir%\system32\Monitoring.vbs >nul 2>nul
del %windir%\system32\Monitoring.bat >nul 2>nul
echo 關閉計劃任務服務...
net stop schedule /y >nul 2>nul
echo 修改組策略中"賬戶:使用空密碼的本地賬戶
echo 只允許進行控制臺登陸"處為 "已啟用" ...
reg add "HKEY_LOCAL_MACHINE\SYSTEM\CurrentControlSet\Control\Lsa" /v limitblankpassworduse /t REG_DWORD /d 00000001 /f >nul
ping 127.1 -n 5 >nul 2>nul & exit
|