屏蔽电脑打开指定网站（源码）

liu307921917 · 发表于 2014-9-17 16:04:51

本帖最后由 liu307921917 于 2014-9-17 23:09 编辑

子程序名	返回值类型	公开	备注
NO_URL
参数名	类型	参考	可空	数组	备注
url	文本型				如：baidu.com 不要加“http://”及“www.”

变量名	类型	静态	数组	备注
文件号	整数型
str	文本型

置文件属性 (取特定目录 (10) ＋ “\drivers\etc\hosts”, 32)
文件号＝打开文件 (取特定目录 (10) ＋ “\drivers\etc\hosts”, , )
str ＝读入文本 (文件号, )
关闭文件 (文件号)
str ＝ str ＋ #换行符＋ “127.0.0.1 ” ＋ url

如果真 (寻找文本 (str, “127.0.0.1 ” ＋ url, , 假) ≠ -1)

置文件属性 (取特定目录 (10) ＋ “\drivers\etc\hosts”, 1)

返回 ()
删除文件 (取特定目录 (10) ＋ “\drivers\etc\hosts”)
写到文件 (取特定目录 (10) ＋ “\drivers\etc\hosts”, 到字节集 (str))
置文件属性 (取特定目录 (10) ＋ “\drivers\etc\hosts”, 1)
运行 (“ipconfig /flushdns”, 假, 1)

i支持库列表	支持库注释
shell	操作系统界面功能支持库

例：
调用格式：
NO_URL(“360.cn”)

PS：
在修改HOSTS文件时候，还常常遇到修改保存后无效的情况，我们可以使用ipconfig /flushdns命令来刷新dns缓存，或者也可以在管理工具中打开服务，找到DNS Client将其停用并改为手动模式在修改完hosts启动。注意：当你在打开浏览器的情况下修改hosts文件时，关闭浏览器时系统才会释放掉hosts文件占用的那部分内存，我们再次打开浏览器访问就发现已经生效了。如果遇到windows 7 操作系统无法打开和编辑的情况，一般是因为安全机制UAC造成的，你可以按着Shift键，然后Hosts文件上面右键，以管理员方式运行即可。或者修改Hosts文件权限，将当前登录的账号加入到安全选项卡中，赋予写入权。还有一种方法就是打开本地连接的Internet（TCP/IP）协议的属性页，点击常规选项卡中的高级按钮，选择WINS选项卡，勾选启用 LMHOSTS 查询，接着按下导入 LMHOSTS按钮，导入hosts文件，这样再次启动浏览器时，就会发现hosts文件生效了。

1735670048 · 发表于 2014-10-16 16:55:11

好啊真厉害啊

1735670048 · 发表于 2014-10-16 16:54:38

牛掰啊厉害

虚伪的爱 · 发表于 2014-10-2 00:33:02

支持下这个不错·！！

宇智波·佐助 · 发表于 2014-9-26 17:28:56

会被杀的

yzc0413 · 发表于 2014-9-22 19:16:48

好雄伟的工程呢，膜拜啦

剩下我de孩子气 · 发表于 2014-9-22 11:23:32

。。。。一样的东西干嘛一直发

yzc0413 · 发表于 2014-9-21 14:03:47

这个是个好玩意儿

猫儿 · 发表于 2014-9-21 13:28:52

那么麻烦,手动都改好了

火云邪神 · 发表于 2014-9-19 09:07:03

易语言可以直接修改hosts权限就好了

少有的意义 · 发表于 2014-9-18 15:00:16

不错的帖子，不过我有点看不懂略麻烦了

		自动登录	找回密码
密码			注册

[易源码分享] 屏蔽电脑打开指定网站（源码）