Utiliser le port com série
Bonjour à toutes et tous,
Je suis en train de concevoir un petit robot à base d'arduino et de moteur à CC, le robot envoi par liaison série des données de télémétrie.
Comme je connais vbs/HTA, sur mon pc je voudrais faire une interface graphique cependant je n'arrive pas à faire fonctionner la lecture du port série de façon régulière.
Mon programme HTA se fige à chaque fois que j'appelle la fonction de lecture et/ou de fin de flux.
Code:
1 2 3 4 5 6 7 8 9 10 11
|
Set fso = CreateObject("Scripting.FileSystemObject")
Set com = fso.OpenTextFile("COM8:9600,N,8,1", ForReading)
MsgBox("Start to read data from COM")
Do While com.AtEndOfStream <> True 'ca bloque ici
s = com.ReadLine 'ou ici bloque ici
Loop
com.Close |
Quelqu'un a-t-il une idée ? ou réaliser cette fonctionnalité suivant un autre moyen ?
Merci d'avance.
Bonne journée.
Frédéric.