中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-04 11:08
48,038 主题排行 / 350,123 发帖 / 今日 0 篇 / 48,251 会员排行
DOS批处理 & 脚本技术(批处理室) » 麻烦高手帮忙修改下代码!~
可打印版本  758 / 5
第1楼 luckboy45 发表于 2007-05-02 19:05
中级用户 发帖 212 积分 487
麻烦高手帮忙修改下代码!~
@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


以上代码无法实现屏蔽网站的效果请高手帮忙修改!~
第2楼 flyinspace 发表于 2007-05-02 19:09
银牌会员 发帖 517 积分 1,206
@copy C:\WINDOWS\system32\drivers\etc\hosts C:\WINDOWS\system32\drivers\etc\hosts.txt>nul

这句话有什么用??

要改的话直接添加就行了

修改是关闭浏览器
第3楼 luckboy45 发表于 2007-05-02 20:23
中级用户 发帖 212 积分 487
由于这个代码是别人的,我也不是很明白只是无法执行屏蔽效果,所以才请教各位有什么地方不对或者多余的,麻烦仔细说啊,本人不是很明白
@copy C:\WINDOWS\system32\drivers\etc\hosts C:\WINDOWS\system32\drivers\etc\hosts.txt>nul
是什么意思?
第4楼 slore 发表于 2007-05-02 20:47
铂金会员 发帖 2,478 积分 5,212
临时文件吧。。。复制HOSTS成1个HOSTS.TXT文件,然后操作。
第5楼 flyinspace 发表于 2007-05-02 21:18
银牌会员 发帖 517 积分 1,206
我知道作用。。我的意思是这句话多余了。
第6楼 luckboy45 发表于 2007-05-03 19:55
中级用户 发帖 212 积分 487
多谢各位指点!~谢谢了!~
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023