Commande à travers usb

RachidGhar Messages postés 2 Date d'inscription   Statut Membre Dernière intervention   -  
ElementW Messages postés 4814 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

je veux commander un système technique éducatif à travers le port usb via une interface vb2010
j'attends vos aides. Merci d'avant

A voir également:

1 réponse

Réponse 1 / 1
ElementW Messages postés 4814 Date d'inscription   Statut Contributeur Dernière intervention   1 223
 
Salut, si ton périphérique peut communiquer en RS-232, tu peux utiliser le port USB comme un port parallèle ou COM normal: 
Imports System.IO.Ports

Dim sensor As SerialPort

Private Sub InitializeUSB()
	sensor = New SerialPort("COM6")
	sensor.BaudRate = 9600
	sensor.Parity = Parity.None
	sensor.StopBits = StopBits.One
	sensor.DataBits = 8
	sensor.Handshake = Handshake.None
	sensor.Open()
End Sub

Private Sub DoCommand()
	sensor.Write("COMMANDE");
        Console.WriteLine(sensor.ReadLine())
End Sub

Private Sub CloseUSB()
	sensor.Close()
End Sub

C'est pas complet et je doute que ça marche du premier coup, adapte selon tes besoins et les erreurs dont ton enviro de dev se plaint :)

Sinon, si c'est de l'USB "normal", il faudra passer par des librairies wrappers telles que winusbnet ou sharpusblib, dont je ne donnerais pas d'exemple ici.
0

Discussions similaires

Que choisir pour boot sur clé usb ?
rolem -
Utilisateur anonyme -

1 réponse