Amigos del Foro:
Tengo el siguiente problema estoy imprimiendo etiquetas de codigo de barras con Zebra TLP 2844,
Estoy usando el Drivers del fabricante en Windows y la impresora conectada via USB.
El codigo de mi boton es el siguiente:
Try
' documento
Dim PrintTxt As New PrintDocument
' evento print
AddHandler PrintTxt.PrintPage, AddressOf Me.ImprimirBoleta
PrintTxt.Print()
Catch ex As Exception
MsgBox("ERROR AL IMPRIMIR BARRA" & vbCrLf & ex.Message)
End Try
El procedimeinto que imprime
Private Sub ImprimirBoleta(ByVal sender As System.Object, ByVal e As PrintPageEventArgs)
' letra
Dim font1 As New Font("Code 128", 20)
Dim font2 As New Font("Arial", 8)
' impresion
e.Graphics.DrawString(Me.ProId.Trim, font1, Brushes.Black, 25, 0)
e.Graphics.DrawString("*" & Me.ProId.Trim & "*", font2, Brushes.Black, 30, 30)
End Sub
Esto me imprime un codigo de barras y el codigo numerico bajo la barra.
Pero No puedo controlar el avance de carro ya que despues que termina de imprimir el carro avanza
y pierdo espacio ademas no tengo como rebobinarlo. Lo ideal seria hacer esto por codigo.
Tal vez me faltan lineas o estoy usando mal algun parametro, o me falta definir alguno.
Uso el mismo codigo para imprimir boltas mariz de punto, pero aqui no tengo problemas porque
estas impresoras tienen un boton "Load Park" que deja la boleta en posicion original.
Pero la impresora Zebra no tiene ese boton y debo controlarlo por codigo.
Cualquier ayuda se los agradezco, que estoy medio complicado.
GRACIAS.
Manuel Sepúlveda
