Manejo de Puerto con VB
Estoy realizando un software de mantenimiento y control para remotas, pero tengo problemas con la recepción de datos por el puerto, ya que recibe la información pero no me almacena en una variable Buffer toda la información sino que la corta y la mantiene en espera en el buffer de recepción, creo que tiene que ver con los comandos RTreshold y InBufferCount cuando genera el evento
1 respuesta
Respuesta de xaviz
1
¿Has probado así?.
Option Explicit
Dim Cadena as String
Private sub form_load()
MSComm1.CommPort = 1
MSComm1.Settings = "19200,n,8,1"
MSComm1.InBufferCount = 0
MSComm1.InputLen = 0
MSComm1.PortOpen = True
end sub
Private sub MSComm1_OnComm()
Cadena=Cadena & MSComm1.Imput
debug.print Cadena
End Sub
Option Explicit
Dim Cadena as String
Private sub form_load()
MSComm1.CommPort = 1
MSComm1.Settings = "19200,n,8,1"
MSComm1.InBufferCount = 0
MSComm1.InputLen = 0
MSComm1.PortOpen = True
end sub
Private sub MSComm1_OnComm()
Cadena=Cadena & MSComm1.Imput
debug.print Cadena
End Sub
