标题: 麻烦高手帮忙修改下代码!~ [打印本页]

---

作者: luckboy45     时间: 2007-5-2 19:05    标题: 麻烦高手帮忙修改下代码!~

@cls
@color A
@echo ************************************************************
@echo #                                                          #
@echo #　　　　　　　   欢迎使用网址屏蔽器                       #
@echo #                                                          #
@echo #                                                          #
@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%"=="3" goto information
@if /i "%enter%"=="4" goto xtsy
goto chose

:add
@set /p input=输入要添加的网址
@if /i "%input%"=="n" goto wz
@echo 127.0.0.1      %input%>>C:\WINDOWS\system32\drivers\etc\hosts.txt
@echo 成功添加屏蔽网址%input%
@copy C:\WINDOWS\system32\drivers\etc\hosts.txt C:\WINDOWS\system32\drivers\etc\hosts>nul
@echo ------------------------------------------
@echo 输入 Y 继续
@echo 输入 F 返回
@echo ------------------------------------------
@set choose =
@set /p choose=请选择：
@if '%choose%'=='y' goto :add
@if '%choose%'=='f' goto :wz

:del

@echo 请输入完整网址!

@set /p del=输入要删除的网址:
@if  /i "%del%"=="n" goto wz
@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 操作完成!
@copy C:\WINDOWS\system32\drivers\etc\hosts.txt C:\WINDOWS\system32\drivers\etc\hosts>nul
@echo ------------------------------------------
@echo 输入 Y 继续
@echo 输入 F 返回
@echo ------------------------------------------
@set choose =
@set /p choose=请选择：
@if '%choose%'=='y' goto :add
@if '%choose%'=='F' goto :wz


以上代码无法实现屏蔽网站的效果请高手帮忙修改!~

---

作者: flyinspace     时间: 2007-5-2 19:09
@copy C:\WINDOWS\system32\drivers\etc\hosts C:\WINDOWS\system32\drivers\etc\hosts.txt>nul

这句话有什么用？？

要改的话直接添加就行了

修改是关闭浏览器

---

作者: luckboy45     时间: 2007-5-2 20:23
由于这个代码是别人的,我也不是很明白只是无法执行屏蔽效果,所以才请教各位有什么地方不对或者多余的,麻烦仔细说啊,本人不是很明白
@copy C:\WINDOWS\system32\drivers\etc\hosts C:\WINDOWS\system32\drivers\etc\hosts.txt>nul
是什么意思?

---

作者: slore     时间: 2007-5-2 20:47
临时文件吧。。。复制HOSTS成1个HOSTS.TXT文件，然后操作。

---

作者: flyinspace     时间: 2007-5-2 21:18
我知道作用。。我的意思是这句话多余了。

---

作者: luckboy45     时间: 2007-5-3 19:55
多谢各位指点!~谢谢了!~