[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖

[网络工具] 屏蔽网址的批处理

经过一番修改后...这个屏蔽网址的终于可以哒...大家试试吧....
  1. @echo off   
  2. @setlocal ENABLEDELAYEDEXPANSION   
  3. title 可屏蔽网址的批处理.
  4. :begin   
  5. mode con cols=50 lines=56   
  6. echo *************************************************   
  7. echo *****************选择如下操作********************   
  8. echo.   
  9. echo.   
  10. echo ***************1.添加要屏蔽的网址****************   
  11. echo ***************2.删除已屏蔽的网址****************   
  12. echo ***************3.查找已屏蔽的网址****************   
  13. echo ***************4.退出****************************   
  14. echo.   
  15. copy %systemdrive%\WINDOWS\system32\drivers\etc\hosts %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt>nul   
  16. :chose   
  17. set /p enter=请你输入你的选择:   
  18. echo.  
  19. if /i "%enter%"=="1" goto add   
  20. if /i "%enter%"=="2" goto del
  21. if /i "%enter%"=="3" goto check   
  22. if /i "%enter%"=="4" goto end   
  23. :add   
  24. set /p input=输入要添加的网址:  
  25. if /i "%input%"=="n" goto chose
  26. echo 127.0.0.1 %input%>>%systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt   
  27. echo 成功添加屏蔽网址%input%   
  28. echo 请准确的输入或者按n跳到chose!   
  29. copy %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt %systemdrive%\WINDOWS\system32\drivers\etc\hosts>nul
  30. pause
  31. cls
  32. goto begin   
  33. :del   
  34. echo ~_~你选择了删除操作切记务必最好输入完整的网址~_~   
  35. set /p del=输入要删除的网址:   
  36. if /i "%del%"=="n" goto chose   
  37. @for /f "tokens=* delims=" %%i in ('findstr /i /v /c:%del% %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt') do (   
  38. set var=%%i   
  39. echo !var!>>b.txt   
  40. )   
  41. copy b.txt %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt>nul   
  42. del b.txt   
  43. echo 操作完成   
  44. echo 请准确的输入或者按n跳到chose!   
  45. copy %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt %systemdrive%\WINDOWS\system32\drivers\etc\hosts>nul
  46. pause
  47. cls   
  48. goto begin   
  49. :check   
  50. for /f "tokens=2 delims= " %%i in ('findstr /i /c:"www" %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt') do (set var=%%i   
  51. echo !var!   
  52. )   
  53. for /f "tokens=2 delims= " %%i in ('findstr /i /c:"bbs" %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt') do (set var=%%i   
  54. echo !var!  
  55. )   
  56. copy %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt %systemdrive%\WINDOWS\system32\drivers\etc\hosts>nul   
  57. pause   
  58. goto begin   
  59. :end   
  60. copy %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt %systemdrive%\WINDOWS\system32\drivers\etc\hosts>nul   
  61. del %systemdrive%\WINDOWS\system32\drivers\etc\hosts.txt   
  62. exit
复制代码
1

评分人数

我是老大

顶顶!!!!!
授教!!!!

TOP

添加网址时其实可以不用把hosts复制为hosts.txt的,可以直接
  1. echo 127.0.0.1 %input%>>%systemdrive%\WINDOWS\system32\drivers\etc\hosts
复制代码
还有,代码最好用[code】 [/code]括起来,好方便别人复制啊,呵呵

[ 本帖最后由 jsj30651 于 2008-4-13 10:44 编辑 ]

TOP

做的很不错,谢谢LZ

TOP

有没有关闭所有网站.添加哪个网站就可以用哪个网站吗.

TOP

LS的想法我也有同感,我知道ie的分级审查可以。
不过,好像很难,例如你如果添加baidu可访问,但是不能访问其他网页,你想想baidu的功能就是通过它访问其他网页,如果只访问它那就任何实际意义

TOP

lz有两下子

TOP

太厉害了 太厉害了 太厉害了

TOP

原帖由 jsj30651 于 2008-4-13 10:43 发表
添加网址时其实可以不用把hosts复制为hosts.txt的,可以直接echo 127.0.0.1 %input%>>%systemdrive%\WINDOWS\system32\drivers\etc\hosts还有,代码最好用括起来,好方便别人复制啊,呵呵



俺也 赞同

TOP

这个好早的东西了。。。

TOP

好棒啊,我爱死你拉!我是你的fans!

TOP

不容易,收藏个研究下

TOP

返回列表