Visual Basic - Conversor USB a RS-232

Hola todos,

Tengo un instrumento conectado a una placa basic stamp bs2px24 la cual sólo tiene puerto serial de comunicación. Mi lap-top sólo tiene puertos USB, por lo que compre un conversor USB a RS-232 Prolific PL-2303 Hx para hacer la adquisición de datos que envia la placa.

La hiperterminal que trae el editor de códigos de la placa para adquirir los datos y funciona bien.

Con vb6 hago la conexión por medio del control MSCOMM pero no pasa nada de nada. Reconoce que hay algo en el puerto pero nada más. No hay adquisición de datos.

Alguna sugerencia.

gracias.

P.D.: Aquí val código

Private Sub Form_Load()


com1.CommPort = 2 ' comm port no.

com1.Settings = "1200,e,7,2"

com1.RThreshold = 24 'no. of chr to recive

com1.InputLen = 0 ' no. of chr on which oncomm event fires


com1.PortOpen = True 'open comm port

End Sub


Public Sub Com1_OnComm()

Dim txtBuf

Dim i As Integer

Dim c As Integer

Dim buffer

Dim stable

Dim EVMsg$

Dim ERMsg$

buffer = ""

txtweight.Text = ""

With com1


Select Case .CommEvent

Case comEvReceive

buffer = .Input

For i = 1 To Len(txtBuf)

c = Asc(Mid$(txtBuf, i, 1))

If (c < 32 Or c > 126) Then

txtweight = txtweight & "" & Hex(c) & ""

Else

txtweight = txtweight & Chr(c)

End If


Next i

'***************************************************************


' Error messages.

Case comBreak

ERMsg$ = "Break Received"


Case comFrame

ERMsg$ = "Framing Error"

Case comOverrun

ERMsg$ = "Overrun Error"

Case comRxOver

ERMsg$ = "Receive Buffer Overflow"

Case comRxParity

ERMsg$ = "Parity Error"


Case Else

ERMsg$ = "Unknown error or event"

'***************************************************************

End Select

End Width

End Sub

Hola Alvaro.

Para comenzar, supongo que el programa que estás desarrollando (donde estás manejando el MSComm) lo estás realizando desde tu lap top (la que solo tiene puertos USB). De ser así, te digo que el MSComm es para el manejo de puertos serie RS-232 y no USB. Por lo que resultaría absurdo utilizar dicho control.

Si me equivoco, aclárame el asunto y vemos que podemos hacer.

Saludos.

De hecho funciona... porque lo hice funcionar puesto que es un conversor de RS-232 a USB. También pensaba lo mismo pero al parecer en Windows funciona puesto que ahora obtengo los datos sin mayor problema.

Salu2...

P.D.: Más tarde posteare el código...

Hola Alvaro, queria saber si podrias postear el codigo ya que yo tengo un problema parecido al tuyo y lo logro solucionarlo a pesar de haber intentado un monton de cambios con em MSComm. Gracias y espero tu respuesta