六、批處理源代碼

@goto start
==============================================================
名稱：反特洛伊木馬
功能：

1、禁用自啟動項目(run runonce runservices)
2、禁止修改.txt、.com、.exe、.inf、.ini、.bat等等文件關聯
3、禁止修改"服務"信息

原理：設置注冊表權限為只讀

版本修訂情況

版本號 修訂日期 修訂人 修訂內容
1.0 2004-12-22 netu0 創建本腳本
==============================================================
:start
@SETLOCAL
@rem 活動代碼頁設為中文
@chcp 936>nul 2>nul
@echo.
@echo ************************************************************
@echo #
@echo #　　　　　　　　　歡迎使用反特洛伊木馬程序
@echo #
@echo #
@echo ************************************************************

:chkOS
@echo.
@ver　find "2000" > nul 2>nul
@if "%ERRORLEVEL%"=="0" goto :2000
@ver　find "Microsoft Windows [版本 5" > nul 2>nul
@if "%ERRORLEVEL%"=="0" goto :2003
@ver　find "XP" > nul 2>nul
@if "%ERRORLEVEL%"=="0" goto :XP
@echo.
@echo #您的操作系統不是Windows 2000/XP/2003中的一種，無法使用。
@goto quit

@rem 在下面語句插不同系統的不同命令
:2000
@set UpdatePolicy=secedit /refreshpolicy machine_policy>nul 2>nul
@goto Selection

:XP
@set UpdatePolicy=GPUpdate /Force>nul 2>nul
@goto Selection

:2003
@set UpdatePolicy=GPUpdate /Force>nul 2>nul
@goto Selection

:Selection
@rem User Choice
@echo.
@echo 請輸入以下選項前面的數字
@echo.
@echo 1： 安裝反特洛伊木馬保護
@echo 2： 刪除反特洛伊木馬保護(恢復默認設置)
@echo 3： 查看技術信息
@echo 4： 退出
@echo.
@set /p UserSelection=輸入您的選擇（1、2、3、4）
@if "%UserSelection%"=="1" goto install
@if "%UserSelection%"=="2" goto uninstall
@if "%UserSelection%"=="3" goto information
@if "%UserSelection%"=="4" goto quit
@rem 輸入其他字符
@cls
@goto Selection

:information
@cls
@echo

============================================================
@echo #
@echo #　　　　　　　　　歡迎使用反特洛伊木馬程序
@echo #
@echo #功能：
@echo #
@echo # 1、設置注冊表自啟動項為只讀(Run、RunOnce、RunService)，
@echo # 防止木馬、病毒通過自啟動項目啟動
@echo # 2、設置.txt、.com、.exe、.inf、.ini、.bat等等文件關聯為只讀，
@echo # 防止木馬、病毒通過文件關聯啟動
@echo # 3、設置注冊表HKLMSYSTEMCurrentControlSetServices為只讀
@echo # 防止木馬、病毒以"服務"方式啟動
@echo #
@echo #注意事項：
@echo # 某些安裝程序也會用到以上注冊表鍵，請在安裝前運行本程序，
@echo # 然后選擇2，恢復默認設置。安裝完成后，重新運行本程序，
@echo # 然后選擇1，實施反特洛伊木馬保護
@echo ==============================================================
@echo.
@echo 按任意鍵，返回選擇
@pause>nul 2>nul
@cls
@goto Selection
:install
@set OP=/grant everyone /read /p:no_dont_copy
@goto Doit
:uninstall
@set OP=/revoke everyone /read /p:yes
@goto Doit

:Doit
@echo.
@echo 正在執行操作...
@rem HKLM
@setacl machineSOFTWAREMicrosoftWindowsCurrentVersionRun /registry %OP%>nul 2>nul
@setacl machineSOFTWAREMicrosoftWindowsCurrentVersionRunOnce /registry %OP%>nul 2>nul
@setacl machineSOFTWAREMicrosoftWindowsCurrentVersionRunServices /registry %OP%>nul 2>nul
@setacl machineSOFTWAREMicrosoftWindowsCurrentVersionRunEX /registry %OP%>nul 2>nul
@setacl machineSOFTWAREMicrosoftWindowsCurrentVersionRunOnceEX /registry %OP%>nul 2>nul
@setacl machineSOFTWAREMicrosoftWindowsCurrentVersionRunServicesEx /registry %OP%>nul 2>nul