MSCOMM32 problemas con el Output

Andres
03 de Octubre del 2003
Hola
Estoy usando el MSCOMM32 para comunicarme por el puerto serie, para leer datos de una balanza y para mandarle datos a una impresora de codigos de barras
Primero puse un boton que lea, para hacer algo sencillo, lo que salia de la balanza y lo escribi en un archivo de texto.

valor=ThisForm.Olecontrol1.input
arc=fcreate("bb.txt")
=fput(arc,valor)
=fclose(arc)

Hasta ahi todo barbaro, pero cuando despues quise mandar lo que habia leido, a la impresora de codigo de barras, no salio nada, probe de muchas formas pero nada.
Y tambien para hacer esto puse un boton que decia.

arc=fopen("bb.txt")
do while !feof(arc)
valor=fget(arc)
ThisForm.Olecontrol1.output=valor
enddo
=fclose(arc)
Y Si uno conccta directamente la balanza con la impresora sale el ticket lo mas bien.
Probe agregando chr(13) en el output, probe acumulando toda el archivo de texto en una sola cadena, probe muchas cosas pero nada.
Lo raro es que tambien probe con el Hyper Terminal capturar en un archivo lo que venia, todo bien, y cuando quise mandar ese archivo con el Hyper Terminal a la impresora, tampoco me imprimio.
A alguien se le ocurre algo?
Muchas gracias.
Andres.

Andres
03 de Octubre del 2003
Nadie me va a ayudar?