Salut,
j'ai un problème ,qui peut m'aider...
mon application est la suivante: j'ai une carte électronique qui contient un module XBee,ce dernier reçoit les données à partir d'un autre module,afin de visualiser ces données sur un PC je dois utiliser un port série,et voila où je trouve le problème:j'arrive pas écrire le code convenable en utilisant visual basic 2008 car j'ai fait plein de recherche mais je trouve seulement les solution sur vb.6(utilisation des MScomm)
s'il vous plait aider moi c'est très intéressent pour moi.
merci pour la réponse ,
bon oui je sais...
en fait j'ai coller ce composant mais mon problème c'est le code
pour moi sur le forme j'ai met un bouton pour connecter le port série et un autre pour la déconnexion,mais j'arrive pas associer le code convenable
salut,
1-configuration du port série dans le form load ou autre.lireini est une fonction pour lire dans un fichier txt, ne t'en occupe pas.
' Configuration du port série utilisé par le module secheur
Try
With SerialPort3
.PortName = LireINI("com3", "Portname")
.BaudRate = CInt(LireINI("com3", "Vitesse"))
.DataBits = CInt(LireINI("com3", "Databits"))
.StopBits = CType(LireINI("com3", "Stopbit"), Ports.StopBits)
.Handshake = CType(LireINI("com3", "protocole"), Ports.Handshake)
.NewLine = vbCrLf 'Chr(10) & Chr(13) ' défini la fin de trame (CR+LF) différent de vbcrlf ! pour exemple
.Open()
End With
Catch ex As Exception
MsgBox("COM3 plus disponible", MsgBoxStyle.Critical)
End Try
code]
-utlisation de l'évenment si pas besoin d'écrire pour avoir une réponse : buffer est un string à décortiquer dasn une fonction.
[code=vb] Private Sub SerialPort3_DataReceived(ByVal sender As Object, ByVal e As System.IO.Ports.SerialDataReceivedEventArgs) Handles SerialPort3.DataReceived
Try
buffer = SerialPort3.ReadLine()
Catch ex As Exception
End Try
End Sub