Virtual Com Port mit VB automatisch finden

[delegug (Gast)]

Guten Tag,

ich habe ein Problem mit einem Gerät. Das Gerät erzeugt einen virtuellen 
Com-Port über eine USB Schnittstelle am PC. Ich möchte nun mit VB auf 
dieses Gerät zugreifen, ohne den Com-Port einstellen zu müssen.

Das Problem ist, dass das Gerät einen Timeout von 2s hat und deshalb 
dauert es immer ziemlich lange wenn man einfach alle aktiven Ports 
abfragt.

Gibt es sonst noch irgendwelche Möglichkeiten zu erkennen dass es ein 
virtueller Port ist z.B. über die PID/VID...?

Hoff mir kann jemand helfen.

[Christian R. (supachris)]

Kannst du dir aus der Registry auslesen. Bei FTDI zum 
Beispiel:http://www.ftdichip.com/Support/Knowledgebase/index.html?wherecanifindport.htm 
und dann einfach gleich direkt den entsprechenden COM Port öffnen 
(vorher bei HKEY_LOCAL_MACHINE\HARDWARE\DEVICEMAP\SERIALCOMM gucken, ob 
der überhaupt gerade angesteckt ist).

[ManiB (Gast)]

Hi,
bei meinem Programm, welches ebenfalls die Ser. Ports nutzt, habe ich 
einen einfachen Test aller 16 Com-Ports realisiert, um herauszufinden, 
ob am Port was angeschlossen ist. Das sollte bei dir auch funktionieren:

Private Sub Form_Load()
    '-----------------------------
    'Port-Test
    On Error GoTo PortTestError
    Dim oldPort As Integer
    oldPort = MSComm1.CommPort
    For i = 0 To 15
        optComPort(i).ForeColor = &H80000011
        MSComm1.CommPort = i + 1
        MSComm1.PortOpen = True
        MSComm1.PortOpen = False
        optComPort(i).ForeColor = &H80000012
NextPortTest:
    Next i
    MSComm1.CommPort = oldPort
    '-----------------------------
    
On Error GoTo 0
    Exit Sub
    
PortTestError:
    Resume NextPortTest

End Sub

[Rufus Τ. F. (rufus)]

> aller 16 Com-Ports

Du weißt, daß Windows 256 serielle Schnittstellen unterstützt?

[Christian R. (supachris)]

Es sind 255, denn COM 0 gibts nicht. Aber egal. Das stupide Öffnen aller 
Com-Ports dauert erstens lange und zweitens kann das sehr dreckige 
Nebeneffekte haben. Wenn ich z.B. den virtuellen COM Port meines 
Original TI USB Debuggers für den MSP430 öffne, obwohl er gerade durch 
die Debug-Software geöffnet ist, schmiert die Software ab und der COM 
Port ist auch nicht mehr anzusprechen bis man USB abzieht und wieder 
ansteckt. Das sollte man tunlichst unterlassen, das ist einfach nur 
schlampig und dreckig programmiert. Eine simple Abfrage der 
HKEY_LOCAL_MACHINE\HARDWARE\DEVICEMAP\SERIALCOMM zeigt alle verfügbaren 
COM Ports an, ohne dass man dran rum fummeln muss.

[delegug (Gast)]

Also danke für die Beiträge,

das funktioniert jetzt einwandfrei. Über das Registry ist es echt viel 
besser und schneller, nicht so wie die einzelnen Ports zu öffnen und 
abzufragen.

[Rufus Τ. F. (rufus)]

> Es sind 255, denn COM 0 gibts nicht.

Dafür gibts aber COM256.

Ich hatte gehofft, daß durch die Nennung der schieren Anzahl möglicher 
Schnittstellen der von Dir zu Recht stupide genannte Ansatz auch so als 
suboptimal erkannt werden könnte, aber Dein deutlicher Hinweis ist wohl 
doch besser.

[Christian R. (supachris)]

Rufus t. Firefly schrieb:
>> Es sind 255, denn COM 0 gibts nicht.
>
> Dafür gibts aber COM256.

Echt? Waren wohl Matlab "Programmierer" am Werk....

[Rufus Τ. F. (rufus)]

Nee, Pascal.