TPV

mcouce
20 de Abril del 2004
Tengo una aplicación y he conseguido el código para que me abra el cajón portamonedas, conectado a través de una impresora de tickets, pero lo que no consigo es imprimir en la impresora de tickets, pues lo único que saca son caracteres raros. La impresora es una Samsung SRP-350G y está conectada por el COM1, tiene emulación de EPSON, 9600 bps, 8 bits datos y 1 bit parada, handshaking DTR/DSR. Si algíen me puede ayudar lo agradecería, y si alguien necesita el código para abrir el portamonedas se lo paso encantado. Saludos y gracias por anticipado.

mcouce
20 de Abril del 2004
Me ha pedido bastante gente el código para abrir el portamonedas. Bien hay que conectar el portamonedas al puerto de la impresora y luego esta al ordenador. Yo la tenía en el COM1 y solamente es necesario crear un botón que ejecute el siguiente código.
*********************************
Dim nFicSalCajon As Integer
Dim Puerto As String
Puerto = "COM1"
nFicSalCajon = FreeFile
Open Puerto For Output As #nFicSalCajon
Print #nFicSalCajon, Chr$(27); "p"; Chr$(0); Chr$(25); Chr$(250)
Close nFicSalCajon
******************************
Espero que os sirva, si alguien tiene código para imprimir en la impresora, leer un código de barras etc, por favor que lo envíe.Gracias