Using a usb hub with a usb-serial adapter and a usb-sound adapter :
usbmanager.GetDevices.Length return 2 (it is correct)
How can I discover what is a usb-serial and what is a sound card ?
I use a FelUsbSerial and need to know what device to open :
device = usbmanager.GetDevices (0) or
device = usbmanager.GetDevices (1)
Using a usb hub with a usb-serial adapter and a usb-sound adapter :
usbmanager.GetDevices.Length return 2 (it is correct)
How can I discover what is a usb-serial and what is a sound card ?
I use a FelUsbSerial and need to know what device to open :
device = usbmanager.GetDevices (0) or
device = usbmanager.GetDevices (1)
Dim UsbDevices() As UsbDevice
UsbDevices = manager.GetDevices
UsbAcc = manager.GetAccessories
For Each UsbDvc As UsbDevice In UsbDevices
Log(UsbDvc.VendorId)
Log(UsbDvc.ProductId)
Dim info As String
Dim r As Reflector
r.Target = UsbDvc
Try
r.Target =r.GetField("mSerialNumber")
Log(r.Target)
If r.Target="AL00AV6C" Then
Exit
End If
Catch
Log(LastException)
End Try
Next