怎么用vbs实现防止计算机使用LMHosts文件-创新互联

这篇文章主要介绍了怎么用vbs实现防止计算机使用 LMHosts 文件，具有一定借鉴价值，感兴趣的朋友可以参考下，希望大家阅读完这篇文章之后大有收获，下面让小编带着大家一起了解一下。

创新互联长期为千余家客户提供的网站建设服务，团队从业经验10年，关注不同地域、不同群体，并针对不同对象提供差异化的产品和服务；打造开放共赢平台，与合作伙伴共同营造健康的互联网生态环境。为平塘企业提供专业的网站设计、做网站，平塘网站改版等技术服务。拥有10多年丰富建站经验和众多成功案例,为您定制开发。

问：

如何防止计算机使用 LMHosts 文件？

答：

这是个有趣的问题，至少对“脚本专家”来说是这样。不是因为脚本难以编写；这实际上非常简单。困难的是（至少对我们来说）在 Windows GUI 中找到 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 错误代码的详细列表。

感谢你能够认真阅读完这篇文章，希望小编分享的“怎么用vbs实现防止计算机使用 LMHosts 文件”这篇文章对大家有帮助，同时也希望大家多多支持创新互联网站建设公司，，关注创新互联行业资讯频道，更多相关知识等着你来学习!

分享标题：怎么用vbs实现防止计算机使用LMHosts文件-创新互联
本文来源：http://cxhlcq.com/article/dcosep.html