RE:puerto serie y lector codigos barras
Hola!!! y feliz año nuevo :)
Si k puedo mantener el hilo, siempre k telefónica no me lo corte :)
He estado mirando la ayuda del control y buscandome la vida para probar el MsComm, pk a mí tb me interesa aprenderlo :) y he descubierto lo k pasa ...
Lo k hay k hacer después de abrir el puerto, o antes, es poner la propiedad RThreshold a un valor diferente a 0 k es el k trae por defecto, con esto hace que cuando llegue al puerto 1 caracter se activa el evento OnComm, en tu caso seria 13, o 15 si el escaner envia un carácter de inicio y fin, según su configuración.
lo cual kedaria + o - así
En el Form Load o en otro sitio:
MSComm1.CommPort = 1
MSComm1.Settings = "19200,N,8,1"
MSComm1.PortOpen = True
MSComm1.RThreshold = 15 ' indicas el tamaño del buffer a 15 car.
en el evento OnComm:
Private Sub MSComm1_OnComm()
If MSComm1.CommEvent = comEvReceive Then
' Han llegado caracteres que provienen del scaner ...
End If
End Sub
Espero k te sirva el ejemplo, en la ayuda si pinchas sobre comEvReceive verás más info, sobre como interceptar errores, cambios de protocolos??, en fin, si tienes alguna duda dimelo e intentaré ayudarte :)