Question

晚上好

我想构建一个VBS函数，该函数返回特定设备名称的传出端口的端口号。

编辑：我已经开始拼凑出需要走的方向。我正在使用下面的脚本来查看是否可以找到自信地选择正确端口所需的所有组件。缺少的一件是，我需要确定我正在使用“传出”端口。现在，传入端口和传出端口的外观与我返回的属性相同，除了通行号...

    Set objWMIService = GetObject("winmgmts:{impersonationLevel=impersonate}!\\.\root\cimv2")
    Set colItems = objWMIService.ExecQuery("Select * from Win32_SerialPort")
    For Each objItem in colItems
        sOut = ""
        sOut= "Description: " & objItem.Description & vbnewline
        sout = sout & "Device ID: " & objItem.DeviceID & vbnewline
        sout = sout & "Name: " & objItem.Name & vbnewline
        sout = sout & "Caption: " & objItem.Caption & vbnewline
        sout = sout & "P'n'P Device ID: " & objItem.PNPDeviceID
        msgbox sOut
    Next
    msgbox "done"

也许我必须使用不同的角度来获取有关传入或传出端口的信息？

VBS：读取虚拟（蓝牙）Comport参数

0 个答案: