communication sur port comRésolu

Question

Bonsoir,

J'ai connecte mon port com1 sur une carte electronique qui comporte un microcontroleur
le role de cette carte (pour le moment) c est d'envoyer ce quelle recoit
c est à dire j'envoi le contenu d un textbox1 sur TX et ma carte me retourne la meme chose mais sur RX que j'affiche dans un textbox2, jusque la pas de probleme
ce qui ne va pas c est que dans mon  textbox2 si j'envoi "1" je recupere "49"
je dois oublier de faire une conversion quelque part je pense
Si quelqu'un à une idee .....
Merci beaucoup
A+

cs_casy · Accepted Answer

En effet ReadChar te renvoie un Integer représentant le code ASCII du caractère reçu. Il te faut utiliser la méthode Microsoft.VisualBasic.Chr pour reconvertir en un caractère.

Sinon, à la place, tu peux utiliser ReadExisting qui va lire d'un seul coup tout ce qui existe dans le buffer de reception.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

cs_casy · Answer

C'est fort probable, 49 étant le code ascii du caractère "1"

Montre nous ton code d'envoie et de reception.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

cs_SEB73460 · Answer

Mon code :

        'envoi du contenu du textbox1 sur le port
        SerialPort1.Write(TextBox1.Text)

       
        While SerialPort1.BytesToRead <> 0

            'lecture du serialport et mettre le contenu dans textbox2
            TextBox2.Text = (SerialPort1.ReadChar.ToString)

        End While

cs_akim77 · Answer

TextBox2.Text = System.Convert.ToChar(SerialPort1.ReadChar)

devrait être la solution de ton problème.

Akim.

cs_SEB73460 · Answer

comme cela ?

TextBox2.Text = System.Convert.ToChar(SerialPort1.ReadExisting)

cs_casy · Answer

Non, soit tu utilise ReadChar qui renvoie un Integer, dans ce cas il te faut faire la conversion,

Soit tu utilise ReadExisting qui renvoie directement une string, donc là tu peux l'utiliser directement sans faire de conversion.

---- Sevyc64  (alias Casy) ----<hr size="2" width="100%" /># LE PARTAGE EST NOTRE FORCE #    http://aide-office-vba.monforum.com/index.php

nasrimaher10 · Answer

'envoi du contenu du textbox1 sur le port
        SerialPort1.Write(TextBox1.Text)

    'lecture du serialport et mettre le contenu dans textbox2
            While SerialPort1.BytesToRead <> 0
                       TextBox2.Text = (SerialPort1.ReadChar.ToString)

        End While

Communication sur port com

7 réponses

Votre réponse

Discussions similaires