| VB-Homepage Tipp 411 |
| Porteigenschaften öffnen (nur Win95/98) |
| Viel gibt es nicht zu schreiben, wenn Sie über
Systemsteuerung/System/Hardwareeigenschaften die Eigenschaften der Anschlüsse (Ports)
aufrufen, dann haben Sie das selbe Menü, das Sie hier mit einem einzigen Aufruf bekommen. Allgemein/Deklarationen Private Declare Function ConfigurePort Lib "winspool.drv" Alias "ConfigurePortA" (ByVal pName As String, ByVal hwnd As Long, ByVal pPortName As String) As Long Funktionsaufruf x = ConfigurePort("", Me.hwnd, "COM1") x liefert hier die Verfügbarkeit des ausgewählten Ports. Alles ungleich 1 ist nicht vorhanden. |
| Tipp-Download |
| Quelle : |
 |