VB 如何替换HOST文件中的字符?

ceb 2007-12-07 05:37:25
如何修改HOST文件内容?
比如修改
127.0.0.1 localhost

修改这个127.0.0.1
但不修改其他东西
...全文
198 3 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
3 条回复
切换为时间正序
请发表友善的回复…
发表回复
zzyong00 2007-12-07
  • 打赏
  • 举报
回复
Dim strcon As String
Open "C:\WINDOWS\system32\drivers\etc\hosts" For Input As #1
strcon = Input(LOF(1), 1)
Close #1
strcon = Replace(strcon, "127.0.0.1 ", "其它的IP")
Open "C:\WINDOWS\system32\drivers\etc\hosts" For Output As #1
Print #1, strcon
Close #1
熊孩子开学喽 2007-12-07
  • 打赏
  • 举报
回复
很简单,HOST文件只是一个去掉后缀名的TXT文件,你按照读写TXT文本文件的方法,先将文件读到一个字符串变量内,再用REPLACE函数就可以替换掉指定内容了,当然,还可以在中间或后面写入你所需要的内容。

HOST文件的作用就是一个本地DNS解析,真正起作用的也就是后面的那几行内容,开头的那一段只是注释而已。
127.0.0.1 localhost
指定本机,这一行不要轻易修改它。
但是你可以在后面加上其他内容,比如:
127.0.0.1 localhost
220.181.28.51 WWW.163.COM
因此你完全可以按照你的意图直接写一个HOST文件来替换系统原来的那个。
ceb 2007-12-07
  • 打赏
  • 举报
回复
没人?

7,785

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧