用vbs实现防止计算机使用 LMHosts 文件

所属分类: 脚本专栏 / vbs 阅读数: 1790
收藏 0 赞 0 分享
问:

您好,脚本专家!如何防止计算机使用 LMHosts 文件?

-- MJ

答:

您好,MJ。您知道,这是个有趣的问题,至少对“脚本专家”来说是这样。不是因为脚本难以编写;这实际上非常简单。困难的是(至少对我们来说)在 Windows GUI 中找到 LMHosts 设置;这是我们需要做的,以便我们可以验证脚本实际上起作用。在一段盲目的查找之后(这对“脚本专家”来说很寻常)我们最终找到了要找的东西:

LMHosts 文件

以防您与“脚本专家”一样一窍不通(对于您来说,但愿不是这样),以下是到达此对话框的操作步骤:

1.

从“控制面板”的“网络连接”中,选取任意的网络连接。

2.

在此连接的“属性”对话框中选择“Internet 协议 (TCP/IP)”,然后单击“属性”

3.

在“Internet 协议 (TCP/IP) 属性”对话框中单击“高级”

4.

在“高级 TCP/IP 设置”对话框中查看“WINS”选项卡。您的设置就在这里。

像我们说的那样,找到 LMHosts 复选框是最难的部分;清除复选框(即防止计算机使用 LMHosts 文件)就简单了:

复制代码 代码如下:

On Error Resume Next  
Const USE_WINS = False
Const USE_LMHOST_FILE = False

strComputer = "."
Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")

Set objNetworkSettings = objWMIService.Get("Win32_NetworkAdapterConfiguration")
errResult = objNetworkSettings.EnableWINS(USE_WINS, USE_LMHOST_FILE)

Wscript.Echo errResult

我们在脚本开始定义了一对常量(USE_WINS 和 USE_LMHOST_FILE)并将他们设置为 False。我们使用常量 USE_WINS 告诉脚本我们要完全禁用 WINS(Windows Internet 命名服务)的使用。如果不是这样的话(如果您要继续使用 WINS,只是不使用 LMHosts 文件)则将 USE_WINS 的值设置为 True。

同时,常量 USE_LMHOST_FILE 告诉脚本我们是否要使用 LMHosts 文件。我们将此常量设置为 False,因为我们将不使用 LMHosts。如果您改变了想法而决定使用 LMHosts,只需将此常量设置为 True。

当然这非常简单。通过编写脚本解决问题总是非常简单。

嗯,好吧:几乎总是。

下一步是连接到本地计算机上的 WMI 服务(尽管我们还可以在远程计算机上执行此操作)。接下来是下面这行代码:

Set objNetworkSettings = objWMIService.Get("Win32_NetworkAdapterConfiguration")

您说对了:这有点不寻常。在大多数 WMI 脚本中,此时我们本该调用 ExecQuery 方法,接着 ExecQuery 为我们返回一个对象的集合来处理。您可能已经注意到在此脚本中我们根本没有使用 ExecQuery。为什么不使用呢?嗯,EnableWINS 方法(用来关闭 WINS 和 LMHosts 文件的方法)是“静态”方法。静态方法无法操作对象的集合;而它只能操作类本身。这表示,您绑定到 Win32_NetworkAdapterConfiguration 类(使用 Get 方法),然后调用 EnableWINS。最终结果为:所有类的实例(即,计算机上的所有网络适配器)将使 LMHosts 禁用。如果您有多个网络适配器,没有规则允许在一个适配器上禁用 LMHosts 而在另一个适配器上启用它。只能是全部启用或全部禁用。

此时,我们仅调用 EnableWINS 方法,依次传递常量 USE_WINS 和 USE_LMHOST_FILE:

errResult = objNetworkSettings.EnableWINS(USE_WINS, USE_LMHOST_FILE)

请注意,我们捕获了变量 errResult 中的返回代码(操作的结果)。我们在脚本的最后一行回显此返回代码。如果 errResult 等于 0,则表示操作成功并且 LMHosts 已被禁用。如果 errResult 为非 0 的任何值,嗯,那就出问题了。在这种情况下,应该检查 WMI SDK 以获得一份 EnableWINS 错误代码的详细列表。

这个问题的答案就是这样。您现在拥有了可禁用 LMHosts 的脚本,而“脚本专家”则了解了在 GUI 中找到 LMHosts 设置的方法。这是个双赢的结果!

更多精彩内容其他人还在看

VBS获取当前目录下所有文件夹名字的代码

有时候我们需要获取当前目录下所有文件夹的名字,那么就可以参考下面的代码了
收藏 0 赞 0 分享

VBS读取注册表的两种方法

有时候我们需要用vbs来操作注册表,一般情况下有两种方法,一种是通过wshshell对象的regread,另外一种是使用WMI操作注册表,下面简单的介绍下
收藏 0 赞 0 分享

查看系统C盘剩余空间的VBS脚本

查看系统C盘剩下的空间方法有很多,在本文要为大家介绍的是通过VBS脚本是如何实现的,感兴趣的朋友不要错过
收藏 0 赞 0 分享

利用VBS实现显示系统服务列表

显示服务列表的方法有很多,在接下来的文章中为大家介绍下利用VBS是如何实现的,感兴趣的朋友不要错过
收藏 0 赞 0 分享

VBS获取文件MD5值(无组件)

VBS获取MD5值最简单的方法是直接调用CAPICOM组件,但是由于CAPICOM组件系统并不是默认安装,所以使用起来不方便
收藏 0 赞 0 分享

VBS调用Photoshop批量生成缩略图的代码

这篇文章主要为大家分享了通过vbs调用Photoshop批量生成缩略图,需要的朋友可以参考下
收藏 0 赞 0 分享

使用vbs获得外网ip并发送到邮箱里

这篇文章主要介绍了使用vbs获得外网ip并发送到邮箱里,需要的朋友可以参考下
收藏 0 赞 0 分享

vbs实现只复制比目标文件更新的文件

有时候我们需要时候备份一些文件,只有当这个文件被修改了并且不是空的时候才复制
收藏 0 赞 0 分享

vbs复制文件夹的实现代码

这篇文章主要介绍了vbs复制文件夹的实现代码,需要的朋友可以参考下
收藏 0 赞 0 分享

VBS文本文件操作实现代码

这篇文章主要介绍了VBS文本文件操作实现代码,需要的朋友可以参考下
收藏 0 赞 0 分享
查看更多