此批处理可适用于对安全系数要求不高,而对一些软件的开启又有一定限制的情况。我编这个只是用来应对宾馆前台的MM的……- @echo off
- color f0
- :menu
- echo.
- echo QQ访问控制
- echo.
- echo.
- echo [1]登陆解锁QQ
- echo.
- echo.
- echo [2]禁用QQ
- echo.
- echo.
- set choice=
- set /p choice= 请输入对应的数字 [回车] 退出:
- if not "%choice%"=="" set choice=%choice%
- echo.
- If /I "%Choice%"=="1" Goto menu_unlock
- if /i "%Choice%"=="2" Goto lock
- if /i "%Choice%"=="" exit
- :menu_unlock
- cls
- set /p choice= 请输入您的密码:
- if not "%choice%"=="" set choice=%choice%
- if /I "%Choice%"=="meetyoucrash1987" Goto qq_unlock||goto password_error
- ::这里的meetyoucrash1987就是个跳转的条件,在这里直到口令验证的作用
- :lock
- reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\{2BB5A27A-5C33-44A0-835C-864723E4E413}User\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer" /f /v "DisallowRun" /t REG_DWORD /d 1 >nul
- reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\{2BB5A27A-5C33-44A0-835C-864723E4E413}User\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun" /f /v "**delvals." /t REG_SZ /d " " >nul
- reg add "HKCU\Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\{2BB5A27A-5C33-44A0-835C-864723E4E413}User\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\DisallowRun" /f /v "1" /t REG_SZ /d "qq.exe" >
- ::qq.exe可以替换成你想禁用的其它程序名
- nul
- cls
- echo.
- echo QQ程序已经禁用,请按任意键退出
- pause>nul
- exit
- :qq_unlock
- reg delete "HKCU\Software\Microsoft\Windows\CurrentVersion\Group Policy Objects\{2BB5A27A-5C33-44A0-835C-864723E4E413}User\Software" /f nul 2>nul
- ping -n 1 -w 500 1 >nul
- echo.
- echo QQ程序已解锁,按任意键开始运行QQ
- pause>nul
- start qq.exe
- exit
- :password_error
- cls
- echo.
- set /p choice= 您输入的密码有误,请重新输入您的密码 [回车] 退出:
- if not "%choice%"=="" set choice=%choice%
- if "%choice%"=="" exit
- if /I "%Choice%"=="meetyoucrash1987" Goto qq_unlock||goto password_error
复制代码 目前最大的缺点就是,输入这个伪口令时,屏幕会完全显示出来,如果有哪位能帮助修改下,让输入这个伪口令时屏幕不直接显示就好了。
[ 本帖最后由 meetyoucrash 于 2010-7-17 08:50 编辑 ] |