Utilizamos cookies propias y de terceros para mejorar la experiencia de navegación, y ofrecer contenidos y publicidad de interés. Al continuar con la navegación entendemos que se acepta nuestra política de cookies.
Te envio la manera de tratar con la impresora de tiquets, que tiene conectado un cajón. Todos los códigos de esta impresora son como genérico solo texto.
Dim nfile As Integer nfile = FreeFile Open "\\botiga-pc\tickets" For Output As #nfile Print #nfile, Chr$(27)+Chr$(112)+Chr$(0)+Chr$(60)+Chr$(240); Close #nfile