vbscript - 使用 WMI 确定哪些适配器连接到 Internet

Question

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

编辑:
好的，我如何使用任何命令工具执行此操作？鉴于咆哮的沉默，我想这是使用 WMI 无法做到的。 :-) 跟踪打印工作吗？我对跟踪不太熟悉。

在此先感谢您的帮助!
富有的

Answer 1

使用 Win32_网络适配器配置找到具有最低 的网络设备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)

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