中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名：www.cn-dos.net 论坛域名：www.cn-dos.net/forum
DOS，代表着自由开放与发展，我们努力起来，学习FreeDOS和Linux的自由开放与GNU精神，共同创造和发展美好的自由与GNU GPL世界吧！

游客: 注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »

中国DOS联盟论坛 » DOS批处理 & 脚本技术（批处理室） » 麻烦高手帮忙修改下代码!~

luckboy45
中级用户

积分 487
发帖 212
注册 2007-4-1
状态离线

『楼主』: 麻烦高手帮忙修改下代码!~

@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

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

逍遥@浪子@反病毒

2007-5-2 19:05

flyinspace
银牌会员

积分 1206
发帖 517
注册 2007-3-25
状态离线

『第 2 楼』:

@copy C:\WINDOWS\system32\drivers\etc\hosts C:\WINDOWS\system32\drivers\etc\hosts.txt>nul

这句话有什么用？？

要改的话直接添加就行了

修改是关闭浏览器

知，不觉多。不知，乃求知

2007-5-2 19:09

luckboy45
中级用户

积分 487
发帖 212
注册 2007-4-1
状态离线

『第 3 楼』:

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

逍遥@浪子@反病毒

2007-5-2 20:23

slore
铂金会员

积分 5212
发帖 2478
注册 2007-2-8
状态离线

『第 4 楼』:

临时文件吧。。。复制HOSTS成1个HOSTS.TXT文件，然后操作。

2007-5-2 20:47

flyinspace
银牌会员

积分 1206
发帖 517
注册 2007-3-25
状态离线

『第 5 楼』:

我知道作用。。我的意思是这句话多余了。

知，不觉多。不知，乃求知

2007-5-2 21:18

luckboy45
中级用户

积分 487
发帖 212
注册 2007-4-1
状态离线

『第 6 楼』:

多谢各位指点!~谢谢了!~

逍遥@浪子@反病毒

2007-5-3 19:55

请注意：您目前尚未注册或登录，请您注册或登录以使用论坛的各项功能，例如发表和回复帖子等。

可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题

论坛跳转: