Page 2 sur 2
Re: Détection de peripheriques USB
Publié : jeu. 28/mars/2019 15:55
par cage
Bonjour,
J'avais oublié une méthode sans API pour détecter les ports COM
C'est la commande DOS mode
Code : Tout sélectionner
C:\>mode
Statut du périphérique COM4:
----------------------------
Baud : 1200
Parité : None
Bits de données : 7
Bits d’arrêt : 1
Temporisation : OFF
XON/XOFF : OFF
Protocole CTS : OFF
Protocole DSR : OFF
Sensibilité DSR : OFF
Circuit DTR : ON
Circuit RTS : ON
Statut du périphérique CON:
---------------------------
Lignes : 9001
Colonnes : 120
Vitesse clavier : 31
Délai clavier : 1
Page de codes : 850
C:\>
L'avantage de cette commande est qu'elle n'affiche que les ports COM disponibles.
Pour trouver les ports COM, utiliser clip pour parser le résultat dans PB
Un exemple rapide
mode com | find /i "COM" donne
Dans PB, utiliser le code suivant:
Code : Tout sélectionner
ClearClipboard()
Flags = #PB_Program_Wait|#PB_Program_Hide
RunProgram("cmd.exe", "/c mode | find /i "+Chr(34)+"COM"+Chr(34)+"|clip", "", Flags)
result$ = GetClipboardText()
Debug result$
CAGE
Re: Détection de peripheriques USB
Publié : jeu. 28/mars/2019 21:00
par venom
Sympa cette astuce DOS. Merci cage.
En revanche c'est étrange, il détecte bien mon port com mais il me renvoie Baud 1200 hors j'ai mis un module dessus et mon module est configurer en 9600.
EDIT:7Autant pour moi
sa marche.
@++
Re: Détection de peripheriques USB
Publié : jeu. 28/mars/2019 21:16
par cage
Si le port COM n'a pas été configuré avec mode, le résultat de la commande mode affiche toujours la même chose.
Pour changer cela, il faut paramétrer le port COM avec mode
Exemple:
Code : Tout sélectionner
C:\>mode com4 baud=19200
Parité paire par défaut.
Statut du périphérique COM4:
----------------------------
Baud : 19200
Parité : Even
Bits de données : 7
Bits d’arrêt : 1
Temporisation : OFF
XON/XOFF : OFF
Protocole CTS : OFF
Protocole DSR : OFF
Sensibilité DSR : OFF
Circuit DTR : ON
Circuit RTS : ON
C:\>mode COM4:
Statut du périphérique COM4:
----------------------------
Baud : 19200
Parité : Even
Bits de données : 7
Bits d’arrêt : 1
Temporisation : OFF
XON/XOFF : OFF
Protocole CTS : OFF
Protocole DSR : OFF
Sensibilité DSR : OFF
Circuit DTR : ON
Circuit RTS : ON
C:\>
Pour plus d'informations sur la commande mode, il faut utiliser la commande
help mode ou
mode /?Code : Tout sélectionner
C:\>mode /?
Configure les périphériques système.
Port série : MODE COMm[:] [BAUD=b] [PARITY=p] [DATA=d] [STOP=s]
[to=on|off] [xon=on|off] [odsr=on|off]
[octs=on|off] [dtr=on|off|hs]
[rts=on|off|hs|tg] [idsr=on|off]
État d’un périphérique : MODE [périphérique] [/STATUS]
Rediriger l’impression : MODE LPTn[:]=COMm[:]
Choisir une page de codes : MODE CON[:] CP SELECT=yyy
État de page de codes : MODE CON[:] CP [/STATUS]
Mode d’affichage : MODE CON[:] [COLS=c] [LINES=n]
Vitesse de répétition : MODE CON[:] [RATE=r DELAY=d]
C:\>
CAGE
Re: Détection de peripheriques USB
Publié : jeu. 28/mars/2019 21:30
par venom
Merci cage, J'ai éditer mon message en même temps que toi. Mon module est bien vue en 9600 Baud
@++