这篇文章主要介绍了怎么用vbs实现防止计算机使用 LMHosts 文件，具有一定借鉴价值，感兴趣的朋友可以参考下，希望大家阅读完这篇文章之后大有收获，下面让小编带着大家一起了解一下。
如何防止计算机使用 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 文件”这篇文章对大家有帮助，同时也希望大家多多支持创新互联网站建设公司，，关注创新互联行业资讯频道，更多相关知识等着你来学习!