联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!
附件 1: 可屏蔽网址的批处理.rar (2006-12-19 10:13, 803 bytes, 下载附件所需积分 1 点 ,下载次数: 92)
@echo off :start @setlocal ENABLEDELAYEDEXPANSION title 可屏蔽网址的批处理. mode con cols=50 lines=15 echo ************************************************* echo *****************选择如下操作******************** echo. echo. echo ***************1.添加要屏蔽的网址**************** echo ***************2.删除已屏蔽的网址**************** echo ***************3.查找已屏蔽的网址**************** echo ***************4.退出**************************** echo. copy C:\WINDOWS\system32\drivers\etc\hosts C:\WINDOWS\system32\drivers\etc\hosts.txt>nul :chose set /p enter=请你输入你的选择: if not "%enter%"=="" set enter=%enter% if /i "%enter%"=="1" goto add if /i "%enter%"=="2" goto del if /i "%enter%"=="4" goto end if /i "%enter%"=="3" goto check goto chose :add set /p input=输入要添加的网址 if /i "%input%"=="n" goto start echo 127.0.0.1 %input%>>C:\WINDOWS\system32\drivers\etc\hosts.txt echo 成功添加屏蔽网址%input% echo 请准确的输入or按n退出! copy C:\WINDOWS\system32\drivers\etc\hosts.txt C:\WINDOWS\system32\drivers\etc\hosts>nul goto add :del echo ~_~你选择了删除操作切记务必最好输入完整的网址~_~ set /p del=输入要删除的网址: if /i "%del%"=="n" goto start @for /f "tokens=* delims=" %%i in ('findstr /i /v /c:%del% C:\WINDOWS\system32\drivers\etc\hosts.txt') do ( set var=%%i echo !var!>>b.txt ) copy b.txt C:\WINDOWS\system32\drivers\etc\hosts.txt>nul del b.txt echo 操作完成 echo 请准确的输入or按n退出! copy C:\WINDOWS\system32\drivers\etc\hosts.txt C:\WINDOWS\system32\drivers\etc\hosts>nul goto del :check for /f "tokens=2 delims= " %%i in ('findstr /i /c:"www" C:\WINDOWS\system32\drivers\etc\hosts.txt') do (set var=%%i echo !var! ) for /f "tokens=2 delims= " %%i in ('findstr /i /c:"bbs" C:\WINDOWS\system32\drivers\etc\hosts.txt') do (set var=%%i echo !var! ) copy C:\WINDOWS\system32\drivers\etc\hosts.txt C:\WINDOWS\system32\drivers\etc\hosts>nul pause cls goto start :end copy C:\WINDOWS\system32\drivers\etc\hosts.txt C:\WINDOWS\system32\drivers\etc\hosts>nul del C:\WINDOWS\system32\drivers\etc\hosts.txt exit
Originally posted by maya0su at 2007-3-11 12:18: 当麦哲伦把鸡蛋立起以后 你总认为很简单! 可是在他没把鸡蛋立起来之前 你为什么不把鸡蛋立起呢! 我也支持楼主!