[问题求助] VBS如何获取所有物理声卡的名称？

1078292299

VBS如何获取所有物理声卡的名称？(不含虚拟网卡）

czjt1234

Set oWMI = GetObject("Winmgmts:\\.\Root\Cimv2")
s = "网卡" & vbCrLf
For Each i In oWMI.InstancesOf("Win32_NetworkAdapter WHERE Physicaladapter = True")
    s = s & i.Name & vbCrLf
Next
s = s & "声卡" & vbCrLf
For Each i In oWMI.InstancesOf("Win32_sounddevice")
    s = s & i.Name & vbCrLf
Next
Wsh.Echo s
复制代码