USB ET VB6

Cherche quelque bout de prg pour la gestion entré sortie sur les ports USB
Lecture de donnée et transfert
Merci

-------------------------------
Réponse au message :
-------------------------------

Cherche quelque bout de prg pour la gestion entré sortie sur les ports USB
Lecture de donnée et transfert
Merci

Bonjour david,

as tu eu des réponse à ta question car moi aussi je voudrais savoir comment gérer le port usb!
si tu as des prg pourrais tu me les envoyer s'il te plait.
abdelouahid.dahri@st.com

Tout pareil je suis aussi à la recherche de bout de prog pour pouvoir lire sur un port USB.Merci
peb0069@caramail.com
PEB69

Idem ... comment communiquer par USB en VB6 ?
Aucun problème en RS232, mais USB !?!?

123456

Si on peut me faire suivre le tuyau aussi, merci.
Dom

Dom
salut

g cherché un peu et pour ceux que ca interesse, pour recupérer des donnée sur les ports usb via visual basic, il fo utiliser direct X
ya un exemple intéressant d'utilisation de joystick via le port usb a la page + le code complet
http://prism.mem.drexel.edu/kennedy/joystickTutorial/samp2.htm

Dom

programmer le port usb en vb6

je fais tout simplement comme ca pour dialoguer avec un module via le port USB
avec l'utilisation de MSCOMM pour la comm sur port USB,

je sais que comm1 et 2 sont pour la liaison serie comme le rs232 mais comm3,4,....16 (pour ce qui ont autant de port usb) est utilisé par le systeme pour l'usb
bout de prog à inserer dans un timer ou autre ( command button)


Mscomm1.CommPort = 3 'communication avec le comm3
Mscomm1.Settings = 9600,N,8,1 ' protocole vitesse parité ....
Mscomm1.Inputlen = 0 ' on considere toute la chaine
Mscomm1.PortOpen = true ' on ouvre la communication
Mscomm1.OutPut = " $01M" & Chr$(13) 'envoie d'une trame à un module

do
buffer$=buffer$ & Mscomm1.Input
loopUntil Instr ( buffer$, vbCr )
Text1.text= buffer$' dans text1 j'ai le contenu de buffer c'est à dire la réponse du module
Mscomm1.PortOpen = false ' je ferme la comm si je fais une action ponctuelle


voilà ca vous conviens ????

Quelques précisions

Mscomm1.Settings = 9600,N,8,1 doit être placé entre côtes :
Mscomm1.Settings = "9600,N,8,1"

loopUntil doit être en deux mots : Loop Until

A part ça, quand je lance ce programme avec un périf usb (pourtant reconnu en com3) je plante mon PC ...

Aussi, des précisions me conviendraient encore mieux ...