运行以下VBScript脚本
Dim deviceFinder Set deviceFinder = CreateObject("UPnP.UPnPDeviceFinder") Dim devices Set devices = deviceFinder.FindByType("ssdp:all", 0) For Each device In devices WScript.Echo device.FriendlyName + " " + device.Type Next
可以得到类似下面的结果
[TV] Samsung 6 Series (55) urn:schemas-upnp-org:device:MediaRenderer:1 [TV] Samsung 6 Series (55) urn:samsung.com:device:RemoteControlReceiver:1 [TV] Samsung 6 Series (55) urn:samsung.com:device:RemoteControlReceiver:1 [TV] Samsung 6 Series (55) urn:dial-multiscreen-org:device:dialreceiver:1 [TV] Samsung 6 Series (55) urn:dial-multiscreen-org:device:dialreceiver:1 [TV] Samsung 6 Series (55) urn:samsung.com:device:RemoteControlReceiver:1 [TV] Samsung 6 Series (55) urn:dial-multiscreen-org:device:dialreceiver:1 [TV] Samsung 6 Series (55) urn:samsung.com:device:RemoteControlReceiver:1 [TV] Samsung 6 Series (55) urn:schemas-upnp-org:device:MediaRenderer:1 [TV] Samsung 6 Series (55) urn:schemas-upnp-org:device:MediaRenderer:1 [TV] Samsung 6 Series (55) urn:schemas-upnp-org:device:MediaRenderer:1 [TV] Samsung 6 Series (55) urn:dial-multiscreen-org:device:dialreceiver:1 [TV] Samsung 6 Series (55) urn:schemas-upnp-org:device:MediaRenderer:1 [TV] Samsung 6 Series (55) urn:schemas-upnp-org:device:MediaRenderer:1 [TV] Samsung 6 Series (55) urn:schemas-upnp-org:device:MediaRenderer:1
其中有三种协议,分别是UPnP、DIAL和urn:samsung.com。UPnP是一个通用的智能设备通信协议,关于在Windows上查找UPnP设备可以参考https://www.cnblogs.com/JebediahKerman/p/Windows_UPnP_APIs.html。DIAL和urn:samsung.com都属于UPnP协议。urn:samsung.com是三星的协议,不作更多讨论。DIAL是一个通用的多屏互动协议,手机视频投送到电视上一般使用的是这个协议。关于DIAL的介绍可以在http://www.dial-multiscreen.org/找到。
注意到上面重复了四次"[TV] Samsung 6 Series (55) urn:dial-multiscreen-org:device:dialreceiver:1",这并不是四个设备,而是同一个设备实现了DIAL的四个版本,分别是1.7、2.0、2.1和2.2。关于协议的描述可以在http://www.dial-multiscreen.org/dial-protocol-specification找到。
来源:https://www.cnblogs.com/JebediahKerman/p/12241747.html