要求:原先host里面已增加以下3行
202.102.101.105 intranet.corp
202.102.101.107 mail.intranet.corp
202.102.101.108 sip.intranet.corp
之后不需要此3行内容,所以运行以上vbs代码,来删除host文件此3行
'该脚本要求执行用户有本地管理员权限 Const ForReading = 1, ForWriting = 2, ForAppending = 8, ReadOnly = 1 Set fso = CreateObject("Scripting.FileSystemObject") Set WshShell=CreateObject("WScript.Shell") 'WinDir 为windows安装目录 WinDir =WshShell.ExpandEnvironmentStrings("%WinDir%") '设定host 文件目录 HostsFile = WinDir & "\System32\Drivers\etc\Hosts" '检查host文件是否为只读,如为只读,则修改文件属性 Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.GetFile(HostsFile) If objFile.Attributes And ReadOnly Then objFile.Attributes = objFile.Attributes Xor ReadOnly End If Set objFSO = CreateObject("Scripting.FileSystemObject") Set objFile = objFSO.OpenTextFile(HostsFile, ForReading,true) '检查host文件里面是否已经更改过了,如果更改过,则不再执行脚本 hostfileline="" Do Until objFile.AtEndOfStream strline = objfile.ReadLine If InStr (strline, "202.102.101.105") <> 0 Or (InStr (strline, "202.102.101.107"))<>0 Or (InStr (strline, "202.102.101.108")) Then strline="" End If hostfileline=hostfileline+vbCrLf+strline Loop WScript.Echo hostfileline objFile.Close '修改host文件 Set filetxt = fso.OpenTextFile(HostsFile, ForWriting ) filetxt.Write hostfileline filetxt.Close WScript.Quit
标签:
vbs删除host
免责声明:本站文章均来自网站采集或用户投稿,网站不提供任何软件下载或自行开发的软件!
如有用户或公司发现本站内容信息存在侵权行为,请邮件告知! 858582#qq.com
岱庙资源网 Copyright www.zgmyg.com
暂无“使用vbs删除host文件域址内容”评论...
稳了!魔兽国服回归的3条重磅消息!官宣时间再确认!
昨天有一位朋友在大神群里分享,自己亚服账号被封号之后居然弹出了国服的封号信息对话框。
这里面让他访问的是一个国服的战网网址,com.cn和后面的zh都非常明白地表明这就是国服战网。
而他在复制这个网址并且进行登录之后,确实是网易的网址,也就是我们熟悉的停服之后国服发布的暴雪游戏产品运营到期开放退款的说明。这是一件比较奇怪的事情,因为以前都没有出现这样的情况,现在突然提示跳转到国服战网的网址,是不是说明了简体中文客户端已经开始进行更新了呢?
更新日志
2024年06月18日
2024年06月18日
- [华语]群星《一人一首成名曲ONEHIFI歌手》2CD[WAV分轨]
- 【乡村摇滚(H)】EgilMydland-2024-Roverhistoria(FLAC)
- 小玥VS张佳《阿里山姑娘DSD》火烈鸟[WAV+CUE]
- 张小英2002-金嗓恋曲之旅2CD[马来西亚版][WAV+CUE]
- Ren Kai《Flow》[320K/MP3][33.02MB]
- Jasper Yu《鬼》[320K/MP3][32.11MB]
- Jasper Yu《鬼》[FLAC/分轨][87.92MB]
- 张小英1995-新春歌曲特辑[香港版][WAV+CUE]
- 张小英2009-真情金曲[引进版][WAV+CUE]
- 群星.1989-彩色的年纪-第六届大学城纪念专辑【飞碟】【WAV+CUE】
- 《KKBOX西洋新歌日榜》[FLAC/分轨][2.9G]
- 崔子格《崔子格歌曲合集》[320K/MP3][121.9MB]
- 《王菲8CD合集》[WAV分轨][4.8G]
- 【欧美乡村(H)】CharlieEwing-2024-BuffaloHorses(FLAC)
- Mantovani2007-MantovaniToday(1970)MusicalMomentsWithMantovani(1974)[FLAC+CUE]