Discussion :

[Guillau.laurent]

Bonjour à tous
je suis en train de developper une application qui utilise le port série.
je souhaite pouvoir utiliser le port n°1,2,3 ou 4.
mais voila ceux ci ne sont pas forcement présent sur le PC
le choix du port se fait par optionbutton
mais je souhaite joué sur la propriété enabled pour ne pas pouvoir utiliser un port qui n'existe!
ma méthode ( pas forcement la meilleure ) ouvrir les port un par un et récupérer s'il ya une erreur.

mais comment intercepter cette erreur?

si quelqu'un peut m'aider merci d'avance

[Megaxel]

Regarde l'aide sur

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

On Error Goto

[ThierryAIM]

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
On Error Resume Next
For i = 1 To 4
    Form1.MSComm1.CommPort = i
    Form1.MSComm1.PortOpen = True
    If Err = 0 Then
        Me.cboPort.AddItem "Com" & i
        Form1.MSComm1.PortOpen = False
    Else
        Err.Clear
    End If
Next i

[Guillau.laurent]

c'est génial! ca marche!!!
Merci beaucoup
à bientot