COMO IMPRIMIR
Agora é como eu faço para IMPRIMIR EM IMPRESSORA DE NOTA FISCAL.
Eu tenho uma listbox e quero imprimi-la em uma impressora de nota fiscal.
Como eu faço isso?
é fiscal ou não fiscal?
Citação::
eu não sei quero que seja universal pois este programa é para um amigo. E não precise se preocupar em que parte da folha irá ficar cituada a impressão pois os números contidos nela serão minimos
Pelo jeito você não sabe diferenciar uma IMPRESSORA GENéRICA de uma que emite CUPOM FISCAL.
Citação::
alguem sabe como imprimir
Não.
Public Class Form1
Private Sub Button1_Click(ByVal s As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sw As New IO.StreamWriter([Ô]C:LIXOLista.txt[Ô])
sw.WriteLine(Chr(27) & [Ô]0[Ô])
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 1[Ô], 1, 30))
[ô]ATIVAR NEGRITO
sw.WriteLine(Chr(27) & [Ô]E[Ô])
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 2[Ô], 1, 30))
[ô]DESATIVAR NEGRITO
sw.WriteLine(Chr(27) & [Ô]F[Ô])
[ô]ATIVAR ITALICO
sw.WriteLine(Chr(27) & [Ô]4[Ô])
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 3[Ô], 1, 30))
[ô]DESATIVAR ITALICO
sw.WriteLine(Chr(27) & [Ô]5[Ô])
[ô]ATIVAR CONDENSADO
sw.WriteLine(Chr(27) & Chr(15))
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 4[Ô], 1, 30))
[ô]DESATIVAR CONDENSADO
sw.WriteLine(Chr(18))
sw.WriteLine([Ô][Ô])
sw.WriteLine([Ô][Ô])
sw.Flush()
sw.Close()
Dim s1 As New IO.StreamWriter([Ô]C:LIXOImprimi.bat[Ô])
s1.Write([Ô]TYPE C:LIXOLista.Txt >prn[Ô])
s1.Flush()
s1.Close()
System.Diagnostics.Process.Start([Ô]C:LIXOImprimi.bat[Ô])
End Sub
End Class
Citação::
Imports System.Drawing.Printing
Public Class Form1
Private Sub Button1_Click(ByVal s As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim sw As New IO.StreamWriter([Ô]C:LIXOLista.txt[Ô])
sw.WriteLine(Chr(27) & [Ô]0[Ô])
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 1[Ô], 1, 30))
[ô]ATIVAR NEGRITO
sw.WriteLine(Chr(27) & [Ô]E[Ô])
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 2[Ô], 1, 30))
[ô]DESATIVAR NEGRITO
sw.WriteLine(Chr(27) & [Ô]F[Ô])
[ô]ATIVAR ITALICO
sw.WriteLine(Chr(27) & [Ô]4[Ô])
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 3[Ô], 1, 30))
[ô]DESATIVAR ITALICO
sw.WriteLine(Chr(27) & [Ô]5[Ô])
[ô]ATIVAR CONDENSADO
sw.WriteLine(Chr(27) & Chr(15))
sw.WriteLine(Space(10) & Mid([Ô]APENAS UM TESTE 4[Ô], 1, 30))
[ô]DESATIVAR CONDENSADO
sw.WriteLine(Chr(18))
sw.WriteLine([Ô][Ô])
sw.WriteLine([Ô][Ô])
sw.Flush()
sw.Close()
Dim s1 As New IO.StreamWriter([Ô]C:LIXOImprimi.bat[Ô])
s1.Write([Ô]TYPE C:LIXOLista.Txt >prn[Ô])
s1.Flush()
s1.Close()
System.Diagnostics.Process.Start([Ô]C:LIXOImprimi.bat[Ô])
End Sub
End Class
Cara tenta ser um pouco mais claro que eu não sou proficional
SOU INICIANTE PRECISO DE AJUDA.
Cada impressora fiscal tem uma dll de acesso e se vc que imprimir para todas primeiro vc precisa de uma para depois passar para todas
Cada fabricante tem um exemplo de impressão se vc for ao site do fabricante na seção de Downloads terá exemplos em Vb6, VB.net, Delphi, C++, COBOL
O PRINCIPAL é LER ATENTAMENTE OS MANUAIS DO FABRICANTE POIS NELE é QUE ESTA O MéTODO DE IMPRESSÃO FISCAL
LEMBRE-SE CADA FABRICANTE TEM SU PROPRIO MéTODO.