Autor Tema: Software para Tiqueteadora  (Leído 2235 veces)

0 Usuarios y 1 Visitante están viendo este tema.

Bazooka

  • Terabyte
  • *****
  • Mensajes: 951
  • Reputación: +31/-20
  • El pibe Bazooka
    • Ver Perfil
    • Desof sistemas
Software para Tiqueteadora
« en: Marzo 08, 2013, 10:58:50 pm »
Hola amigos un cliente me pidio que le desarrrolle un softaware para comunicarse con unas impresoras que imprimen tiquet no fiscal.
Es para tener en eventos donde se venden Tiquet de bebidas y eso y se compran en caja que la impresora le imprime el nombre valor y con ese tiquet reita la mercaderia.

Sucede que no conozco ni como son ni como funcionan estas impresoras.
Alguien me echa un dato o algo para comenzar a indagar?
Todos somos muy ignorantes. Lo que ocurre es que no todos ignoramos las mismas cosas.

E N T E R

  • Petabyte
  • ******
  • Mensajes: 1062
  • Reputación: +57/-13
  • www.enterpy.com
    • Ver Perfil
    • www.enterpy.com
Re:Software para Tiqueteadora
« Respuesta #1 en: Marzo 09, 2013, 09:48:15 am »
Hola Miguel yo lo hago asi: con impresoras conectadas a LPT.

Código: (VB) [Seleccionar]
Private Sub Command1_Click()
   
    Open "LPT1:" For Output As #1     'El LPT1: es el puerto en donde esta conectado tu impresora, podes ver en las propiedades de la impresora eso.
   
    Print #1, Tab(1); "COMPROBANTE DE VENTA"
    Print #1, Tab(1); "CANT"; Tab(6); "P R O D U C T O"; Tab(26); "I.V.A"; Tab(34); "SUBTOT"
   
    For i = 1 To 5
        Print #1, Tab(3); "1"; Tab(6); "UNO"; Tab(26); "10%"; Tab(34); "10.00"
    Next i

    Print #1, Tab((40 - Len("GRACIAS POR SU COMPRA!")) \ 2); "GRACIAS POR SU COMPRA!"
   
End Sub


Si tu impresora es con conexion USB es casi la misma cosa. Printer.CurrentX, Printer.CurrentY

Código: (VB) [Seleccionar]
Printer.CurrentX = 31:       Printer.CurrentY = 42:    Printer.Print "COMPROBANTE DE VENTAS"

Saludos...
CIBER GOOGLE - CONCEPCIÓN PARAGUAY
www.enterpy.com
Primera regla de la programacion, para que vas a hacerlo complicado si lo puedes hacer sencillo