Download Driver PIN Pad Ingenico iPP320 USB

I'm starting to work with a pinpad. I need that my program find the port where the pinpad is connected without user interaction.

I tried with:

Dim searcher As New ManagementObjectSearcher("root\cimv2", "SELECT * FROM Win32_SerialPort") For Each queryObj As ManagementObject In searcher.Get MsgBox(queryObj("Name")) Next but this only give me "COM1" and "COM2" as an answer (My device is connected to COM4)

and with

Dim searcher As New ManagementObjectSearcher("root\cimv2", "SELECT * FROM Win32_PnPEntity WHERE ConfigManagerErrorCode = 0") For Each queryObj As ManagementObject In searcher.Get MsgBox(queryObj("Name")) Next With this one I can see my device friendly name but I don´t know how to get the port (I receive the names like 'HP printer')