Visual Basic - Problema Mscomm

Life is soft - evento anual de software empresarial
 
Vista:

Problema Mscomm

Publicado por Marcos Campos (5 intervenciones) el 05/12/2005 21:15:29
Hola Grupo:

Necesito de vuestra cooperacion que estoy que rompo la cabeza y no doy
con el problema

Tengo un programa que captura el peso que proveniente de una balanza a traves de comunicacion RS-232(el peso llega en forma continua) , en mi PC anda todo bien... el string de dato llega en forma correcta, pero una vez que lo instalo en otra maquina cada cierta secuencia de datos me acumula el string que recibo desde el puerto, en ambos PC abri el puerto con hyperterminal y envia los datos en forma correcta, asi que por el momento descarte problemas de configuracion de los puertos Serial. Para
establecer la comunicacion utilizo el objeto MSCOMM

Este es el codigo que utilizo

Private Sub Form_Load()

With Me.MSComm1


.Handshaking = comNone

.DTREnable = False
.RThreshold = 13
.RTSEnable = True
.Settings = "9600,n,8,1"
.CommPort = 1

.PortOpen = True

End With

End Sub

'--------------------------------------------

Private Sub MSComm1_OnComm()

Dim x As String

If MSComm1.CommEvent = 2 Then

x = Me.MSComm1.Input
Me.LBLPESO = x

Me.List1.AddItem Me.LBLPESO

End If

End Sub
'--------------------------

¿ Debo utilizar algun retardo para solucionar esto ?

¿ Como soluciono este problema ?.

Cualquier sugerencia o ayuda será bien recibida.

Agradeceria vuestra cooperacion...

una vez mas .... Muchas gracias!!

Salu2

M@rcos
Valora esta pregunta
Me gusta: Está pregunta es útil y esta claraNo me gusta: Está pregunta no esta clara o no es útil
0
Responder