Discussion :

[Poisson-Neko]

Bonjour,

J'ai un petit probleme de transmition sur le port série avec VB. J'ai donc une simple page, avec un bouton, et un controle SerialPort1.
J'l'ai configuré en 2400 8.O.1 (2400bauds, 8 bits data, parité paire, 1 bit stop), conformément à mon périf.
J'ai aussi un sniffer sur le port série (pour voir).
J'envoi la trame "08 A5 AD" en cliquant sur le bouton, et doit recevoir une réponse.
j'ai ca dans le prog:
SerialPort1.Write("" + Chr(8) + Chr(165) + Chr(173))
et le sniffer voi: "08 3F 3F", et, le périf ne répond rien (puisqu'il ne recoi pas la bonne commande).

dans les propriété, ou meme en reconfigurant le nombre de databit a 8 dans le code, j'ai cette réponse. En fait, tous caractere envoyé au dela de 7F (80, 90, 165, 173...) est remplacé par 3F.

Si quelqu'un a une idée du pourquoi du comment...

[Kikos31]

Bonjour,

J'ai un petit probleme de transmition sur le port série avec VB. J'ai donc une simple page, avec un bouton, et un controle SerialPort1.
J'l'ai configuré en 2400 8.O.1 (2400bauds, 8 bits data, parité paire, 1 bit stop), conformément à mon périf.

Salut,

tu devrais essayer 2400 8.E.1, car O veux dire Odd ce qui, traduit dans la langue de molière, veux dire impaire .

Paire c'est Even et donc E.

A+

[Poisson-Neko]

Heu, oué, c'est une erreur de ma part.
Le périf est bien en parité impaire (et pas paire comme j'ai dit). C'est bien le O.

Avec d'autres petits prog pour interroger le port série, j'y arrive. Qu'est-ce qui cloche dans le code? (de quoi avez vous besoin pour vérifier?)
Perso, je seche encore.

[Kikos31]

Bonjour,

J'ai un petit probleme de transmition sur le port série avec VB.
...j'ai ca dans le prog:
SerialPort1.Write("" + Chr(8) + Chr(165) + Chr(173))
et le sniffer voi: "08 3F 3F", et, le périf ne répond rien (puisqu'il ne recoi pas la bonne commande).
Si quelqu'un a une idée du pourquoi du comment...

re-salut,

Un petit conseil si tu veux écrire du binaire, il vaut mieux utiliser la surcharge suivante et le faire en binaire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
        Dim Req() As Byte = {&H8, &HA5, &HAD}
        serialport1.Write(Req, 0, Req.Length)

Quand tu envoi une string au port série, il faut regarder comment elle est encodée ( classe ASCIIEncoding), car elle est en unicode UTF8/16/32 et donc tu as plusieurs octets par caractères.

A+

[Poisson-Neko]

J'y crois pas !!!!! juste a cause d'un encodage a la noix !!!!!!!


Merci beaucoup !!!! Enfin, j'avance !

[issam269]

bonjour
j'ai le meme probleme j'essai d'etablir une communication serie entre Pc et machine,avec un sniffer sur le port serie,mais quand j'envoie une trame au dela de ( 7E ),le sniffer affiche autre chose et la machine ne reponds pas puisqu'elle ne recois pas la bonne commande.et voila la configuration du port :

'configuration du port RS232
RS232.BaudRate = 19200 'vitesse du port
RS232.Parity = IO.Ports.Parity.None 'pas de parité
RS232.StopBits = IO.Ports.StopBits.One 'un bit d'arrêt par octet
RS232.DataBits = 8 'nombre de bit par octet
RS232.RtsEnable = False 'ligne Rts désactivé
RS232.DtrEnable = False 'ligne Dtr désactivé

aidez moi svp c'est pour mon projet de fin d'etudes, ma soutenance est dans 10 jours.svp
meilleurs salutations

Bonjour,

J'ai un petit probleme de transmition sur le port série avec VB. J'ai donc une simple page, avec un bouton, et un controle SerialPort1.
J'l'ai configuré en 2400 8.O.1 (2400bauds, 8 bits data, parité paire, 1 bit stop), conformément à mon périf.
J'ai aussi un sniffer sur le port série (pour voir).
J'envoi la trame "08 A5 AD" en cliquant sur le bouton, et doit recevoir une réponse.
j'ai ca dans le prog:
SerialPort1.Write("" + Chr(8) + Chr(165) + Chr(173))
et le sniffer voi: "08 3F 3F", et, le périf ne répond rien (puisqu'il ne recoi pas la bonne commande).

dans les propriété, ou meme en reconfigurant le nombre de databit a 8 dans le code, j'ai cette réponse. En fait, tous caractere envoyé au dela de 7F (80, 90, 165, 173...) est remplacé par 3F.

Si quelqu'un a une idée du pourquoi du comment...