Problemas de corte de papel con impresora tickets
Publicado por Alex (1 intervención) el 26/02/2003 15:23:06
Tenemos una aplicación desarrollada en Visual Basic 6, que es un TPV de tiendas de fotografía. El cliente se ha cambiado la impresora de tickets, y la nueva tiene la funcionalidad de corte automático de papel.
El problema es que a veces (y sin ninguna lógica aparente) da error, y no hace el corte de papel. Otras veces funciona bien. Creo que es un problema que cuando el programa manda la orden de cortar el papel, el puerto de la impresora está ocupado todavía imprimiendo el ticket, y por eso da error.
El código que utilizamos en Visual Basic para cortar el papel es:
Dim nfile As Integer
nfile = FreeFile
Open "LPT1" For Output As #nfile
Print #nfile, Chr$(&H1B); "m";
Close #nfile
El error no tiene nada que ver con el número de líneas del ticket. A veces da error con tickets de una sola línea, y a veces con tickets bastante largos. He probado de poner un retardador para que la impresora tuviera tiempo de imprimir todo el ticket, pero nada.
Me podéis ayudar? Gracias.
El problema es que a veces (y sin ninguna lógica aparente) da error, y no hace el corte de papel. Otras veces funciona bien. Creo que es un problema que cuando el programa manda la orden de cortar el papel, el puerto de la impresora está ocupado todavía imprimiendo el ticket, y por eso da error.
El código que utilizamos en Visual Basic para cortar el papel es:
Dim nfile As Integer
nfile = FreeFile
Open "LPT1" For Output As #nfile
Print #nfile, Chr$(&H1B); "m";
Close #nfile
El error no tiene nada que ver con el número de líneas del ticket. A veces da error con tickets de una sola línea, y a veces con tickets bastante largos. He probado de poner un retardador para que la impresora tuviera tiempo de imprimir todo el ticket, pero nada.
Me podéis ayudar? Gracias.
Valora esta pregunta


0