当前位置：文江博客话题详情

使用 WMI 确定哪些适配器连接到互联网

发布于 2024-09-10 15:33:07 字数 232 浏览 2 评论 0原文

我正在编写一个 VB 脚本，它使用 WMI 来确定哪个适配器用于 Internet 连接？例如 - 如果我有一个 LAN 和一个 3G 板，它需要告诉用户哪个已连接。我知道一台机器可能有 >1 个互联网连接，但现在，我们假设 1.

编辑：好的，我怎样才能使用任何命令工具来做到这一点？鉴于一片寂静，我想使用 WMI 无法做到这一点。 :-) 痕迹打印有用吗？我对跟踪不太熟悉。

预先感谢您的任何帮助！富有的

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

淡忘如思 2024-09-17 15:33:07

使用Win32_NetworkAdapterConfiguration查找IPConnectionMetric最低的网络设备，这将是第一个用于互联网访问的设备。

strComputer = "."
Set objWMIService = GetObject(_
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration")

metric = 500
description = ""

For Each objItem in colItems
    If (objItem.IPConnectionMetric < metric AND objItem.IPConnectionMetric >= 0) then
        metric = objItem.IPConnectionMetric
        description = objItem.Description
    End If
Next

Set WshShell = CreateObject("WScript.Shell")
WshShell.Popup(description)

用于访问 WMI 的 VBScript 示例可以在 MSDN 上找到

Using Win32_NetworkAdapterConfiguration find the network device that has the lowest IPConnectionMetric, this will be the first device used for internet access.

strComputer = "."
Set objWMIService = GetObject(_
    "winmgmts:\\" & strComputer & "\root\cimv2")
Set colItems = objWMIService.ExecQuery("Select * From Win32_NetworkAdapterConfiguration")

metric = 500
description = ""

For Each objItem in colItems
    If (objItem.IPConnectionMetric < metric AND objItem.IPConnectionMetric >= 0) then
        metric = objItem.IPConnectionMetric
        description = objItem.Description
    End If
Next

Set WshShell = CreateObject("WScript.Shell")
WshShell.Popup(description)

VBScript examples for accessing the WMI can be found on MSDN

回复收藏 0 原文

~没有更多了~