Vbscript 使用WMI确定连接到internet的适配器

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

编辑： 好的，我如何使用任何命令工具来实现这一点？鉴于喧嚣的寂静，我想这是无法使用WMI实现的。：-）追踪打印行吗？我对trace不太熟悉

提前感谢您的帮助！

---

Rich

使用Win32\u NetworkAdapter配置查找具有最低IPConnectionMetric的网络设备，这将是第一个用于internet访问的设备

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)

strComputer=“”
设置objWMIService=GetObject(_
“winmgmts:\\”&strComputer&“\root\cimv2”）
Set colItems=objWMIService.ExecQuery（“从Win32\U NetworkAdapterConfiguration中选择*）
公制=500
description=“”
对于每个对象，在colitem中
如果（objItem.IPConnectionMetric=0），则
metric=objItem.IPConnectionMetric
description=objItem.description
如果结束
下一个
设置WshShell=CreateObject（“WScript.Shell”）
WshShell.Popup（说明）

访问WMI的VBScript示例可在上找到