bonjour a tous,

voila dans un programme j'utilise
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
Form1.Caption = "Form1"                                     'le titre du form
   With MSComm3                                            'configuration du port
        .CommPort = 3                                       'On utilise le port COM3
        .Handshaking = 2                                    'RTS
        .RThreshold = 1
        .RTSEnable = True                                   'mieux pour le port COM:
        .Settings = "9600,n,8,1"                            'taux 9600 bauds, sur 8 bit avec un bit de stop
        .PortOpen = True                                    'ouverture du port
        .SThreshold = 1
        End With
mais le problème et qu'il est possible que ce soit un autre port que le trois qui soit ouvert, comment peut-on faire pour checker tous les ports ouvert?

merci