
Uso de Serial Port
Publicado por raxe (5 intervenciones) el 06/07/2010 09:31:06
Incluyo en el proyecto la referencia "SerialPort"
Al dispositivo se envian caracteres ASCII entre 0 y 255 como una cadena de texto.
cada caracter es un valor.
Para saber si comunica hay que enviar 002 000 001 254 255 así que doy a la variable "EnvioTXT" el siguiente valor:
EnvioTXT = Chr(2) & Chr(0) & Chr(1) & Chr(254) & Chr(255)
¿ Como seria aquí en comando a enviar al Serial Port ?
Probe esto pero no se si es correcto:
Dim EnvioTXT as String
EnvioTXT = Chr(2) & Chr(0) & Chr(1) & Chr(254) & Chr(255)
SerialPort1.WriteLine(EnvioTXT)
A su vez Serial Port me deberia de devolver una cadena de caracteres ASCII
con la respuesta donde tengo que evaluar el valor de cada caracter.
¿ Como leo o recibo la respuesta usando Serial Port ?
Probe esto pero la respuesta que obtengo no es correcta.
Dim ReciboTXT as String
ReciboTXT = SerialPort1.ReadLine
Gracias,
Al dispositivo se envian caracteres ASCII entre 0 y 255 como una cadena de texto.
cada caracter es un valor.
Para saber si comunica hay que enviar 002 000 001 254 255 así que doy a la variable "EnvioTXT" el siguiente valor:
EnvioTXT = Chr(2) & Chr(0) & Chr(1) & Chr(254) & Chr(255)
¿ Como seria aquí en comando a enviar al Serial Port ?
Probe esto pero no se si es correcto:
Dim EnvioTXT as String
EnvioTXT = Chr(2) & Chr(0) & Chr(1) & Chr(254) & Chr(255)
SerialPort1.WriteLine(EnvioTXT)
A su vez Serial Port me deberia de devolver una cadena de caracteres ASCII
con la respuesta donde tengo que evaluar el valor de cada caracter.
¿ Como leo o recibo la respuesta usando Serial Port ?
Probe esto pero la respuesta que obtengo no es correcta.
Dim ReciboTXT as String
ReciboTXT = SerialPort1.ReadLine
Gracias,
Valora esta pregunta


0