Como imprimir na porta usb?

Question

boa tarde amigos da msdn, estive afastado um tempo do forum, mas voltando a ativa hoje.

Amigos tenho um sistema de Caixa Loja, que imprime na porta LPT1, ja funcionando.Um cliente quer comprar meu sistema, ta praticamente vendido, mas o lojista quer usar uma impressora MATRICIAL EPSON 350, eu vi que a impressora tem a porta LPT1 e USB, o computador da loja dele é de um modelo novo e ja precebi que tenho que mudar o codigo para imprimir na USB, amigos confesso que estou preocupado.

Amigos uso esse codigo Aki para jogar 

Try
                codutf = System.Text.Encoding.GetEncoding("ISO-8859-1")
                Dim fluxotexto As IO.StreamWriter
            fluxotexto = New IO.StreamWriter(Ticket, True, codutf)

            Dim dateHorario As Date
            Dim Cabecalho As String
            Dim Endereco As String
            Dim Mascara As String
            Dim texto As String
            Dim Espaco As String
            Dim Tel As String

            cont = cont + 1

            If cont = 1 Then
                dateHorario = Now
                Tel = "Tel: [phone]"
                Cabecalho = "Depósito e Casa de Ferragens Oliveira"
                Endereco = "Rua Guaicuri, nº 30 A Vila Missionária SP" & vbCrLf
                Mascara = "Cod.Barra     Produto     Preço      QTD"
                fluxotexto.WriteLine(dateHorario)
                fluxotexto.WriteLine (Tel)
                fluxotexto.WriteLine(Cabecalho)
                fluxotexto.WriteLine(Endereco)
                fluxotexto.WriteLine(Mascara)
            End If


            texto = douCodBarras & " " & strItem & " " & strPreco & " " & intQtd
            Espaco = "--------------------------------------------------------------------------------                                                                                                                                                                                                                                                                                                                                                                                                   "

            fluxotexto.WriteLine(texto)


            If cont = contador Then
                fluxotexto.WriteLine("                                   ")
                fluxotexto.WriteLine("Total                           " & txtTotalPagar.Text)
                fluxotexto.WriteLine("Dinheiro                        " & txtDinheiro.Text)
                fluxotexto.WriteLine("Troco                           " & txttroco.Text)

                fluxotexto.WriteLine(Espaco)
            End If
            fluxotexto.Close()

        Catch ex As Exception
            System.Windows.Forms.MessageBox.Show(ex.Message)
        End Try

          System.IO.File.Copy("c:\Pasta Ticket\Ticket.txt", "LPT1", True)

Podem me ajudar a converter isso para USB?

---

Anderson.mds

Answer 1

Amigos estive pensando o seguinte.

O meu sistema ele imprime direto na LPT1, faço assim, coloco todo o conteudo em um bloco de notas e jogo na porta LPT1, estive pensando, e se eu instalar a impressora matricial epson lx 350 como impressora padrão, ee depois pegar o bloco de notas e imprimir, sera que daria serto?
Por que eu usava uma impressora daruma antiga e esta como red/only

por que eu crio o Ticket " Bloco de notas" e depois jogo na LPT1

================codigo criar bloco notas====================

Private Sub CriarTicket()


        Try
                codutf = System.Text.Encoding.GetEncoding("ISO-8859-1")
                Dim fluxotexto As IO.StreamWriter
            fluxotexto = New IO.StreamWriter(Ticket, True, codutf)

            Dim dateHorario As Date
            Dim Cabecalho As String
            Dim Endereco As String
            Dim Mascara As String
            Dim texto As String
            Dim Espaco As String
            Dim Tel As String

            cont = cont + 1

            If cont = 1 Then
                dateHorario = Now
                Tel = "Tel: [phone]"
                Cabecalho = "Depósito e Casa de Ferragens Oliveira"
                Endereco = "Rua Guaicuri, nº 30 A Vila Missionária SP" & vbCrLf
                Mascara = "Cod.Barra     Produto     Preço      QTD"
                fluxotexto.WriteLine(dateHorario)
                fluxotexto.WriteLine (Tel)
                fluxotexto.WriteLine(Cabecalho)
                fluxotexto.WriteLine(Endereco)
                fluxotexto.WriteLine(Mascara)
            End If


            texto = douCodBarras & " " & strItem & " " & strPreco & " " & intQtd
            Espaco = "--------------------------------------------------------------------------------                                                                                                                                                                                                                                                                                                                                                                                                   "

            fluxotexto.WriteLine(texto)


            If cont = contador Then
                fluxotexto.WriteLine("                                   ")
                fluxotexto.WriteLine("Total                           " & txtTotalPagar.Text)
                fluxotexto.WriteLine("Dinheiro                        " & txtDinheiro.Text)
                fluxotexto.WriteLine("Troco                           " & txttroco.Text)

                fluxotexto.WriteLine(Espaco)
            End If
            fluxotexto.Close()

=================================================================

e depois jogo na LPT1 assim

=====================codigo=========================================

System.IO.File.Copy("c:\Pasta Ticket\Ticket.txt", "LPT1", True)

===============================================================

Bom é isso amigos

---

Anderson.mds

Answer 2

Para evitar mexer em seu sistema que esta funcionando, tente apenas maper a USB para a porta LPT1.