IMPRIMIR USANDO SPOOLER

 Tópico anterior Próximo tópico Novo tópico

IMPRIMIR USANDO SPOOLER

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#496853 - 28/04/2021 18:15:40

MFLAVIO
CAMPINAS
Cadast. em:Maio/2009


Ola Pessoal

(fechei o tópico sobre a Impressora Brother ql-810 após muitas tentativas, consegui falar com o suporte ao Desenvolvedor da Brother, e me disseram que essa impressora e um modelo Novo, e por isso ainda não tem SDK, ou DLL ou nada)

então resolve tentar usar essa bendita impressora via Spooler do Windows, a final consigo usa-la pelo word, pelo excell e por ai vai

bom no vb6 eu usava o Printer.print e ia bem
no vb.net, tenho que usar o System.Drawing.Printing (nunca usei esse assemble antes) pesquisando criei a classe abaixo para começar a desenvolver a etiqueta
a questão e que tudo que sai na impressora e uma pagina em banco(na Brother, na bematech, na zebra) e tudo em branco

Imports System.Drawing.Printing

Public Class Etiqueta_JB5
    Dim ImpressoraNome As String
    Private Sub Gera(sender As Object, E As System.Drawing.Printing.PrintPageEventArgs)
        Dim PrnDOC As New PrintDocument()
        Dim Fonte As New Font('Verdana', 10, System.Drawing.GraphicsUnit.Point)
        Dim Fonte2 As New Font('Verdana', 22, System.Drawing.GraphicsUnit.Point)
        Dim Linha As New Pen(Brushes.Black)

        E.Graphics.DrawString('teste1', Fonte, Brushes.Black, 5, 5, New StringFormat())
        E.Graphics.DrawString('teste2', Fonte2, Brushes.Black, 0, 0, New StringFormat())
        E.Graphics.DrawString('Teste3', Fonte, Brushes.Black, 10, 10, New StringFormat())
        E.Graphics.DrawLine(Linha, 100, 60, 20, 60)
        PrnDOC.DocumentName = 'Etiqueta JB5'
        PrnDOC.PrinterSettings.PrinterName = ImpressoraNome
        PrnDOC.Print()

    End Sub
    Public Sub ImprimirTeste(NomePrint As String)
        ImpressoraNome = NomePrint
        Dim PrintPD As New PrintDocument
        AddHandler PrintPD.PrintPage, AddressOf Gera
        PrintPD.Print()
    End Sub

End Class
  

pelo que entendi
deveria imprimir o que estou carregando na variável E

mais alguma coisa não esta certo
como nunca usei o  System.Drawing.Printing
e não achei nada sobre o mesmo aqui no fórum
agradeço qualquer ajuda

Deus e o maior dos Programadores, ele criou tudo em liguagem visual
                                           .... e viu Deus que era bom


#496856 - 29/04/2021 10:46:14

MFLAVIO
CAMPINAS
Cadast. em:Maio/2009


Bom dia Pessoal
Consegui, fazer Imprimir
o erro estava no
   Dim PrnDOC As New PrintDocument()

agora surgiu uma nova Duvida
como faço para pular para a próxima etiqueta?

Deus e o maior dos Programadores, ele criou tudo em liguagem visual
                                           .... e viu Deus que era bom


#496857 - 29/04/2021 11:46:41

FABRICIOWEB
BELO HORIZONTE
Cadast. em:Novembro/2011


 Anexos estao visíveis somente para usuários registrados

Citação:
:
Bom dia Pessoal
Consegui, fazer Imprimir
o erro estava no
   Dim PrnDOC As New PrintDocument()

agora surgiu uma nova Duvida
como faço para pular para a próxima etiqueta?

eu tive um problema serio com isso acabei fazendo tudo pelo javascript e html ficou bem bom e como eu uso somente as folhas a4 foi mais facil fazer as configurações dos modelos



#496870 - 30/04/2021 18:02:38

MFLAVIO
CAMPINAS
Cadast. em:Maio/2009


Citação:
:
:
Bom dia Pessoal
Consegui, fazer Imprimir
o erro estava no
   Dim PrnDOC As New PrintDocument()

agora surgiu uma nova Duvida
como faço para pular para a próxima etiqueta?
eu tive um problema serio com isso acabei fazendo tudo pelo javascript e html ficou bem bom e como eu uso somente as folhas a4 foi mais facil fazer as configurações dos modelos

que legal, parabens
a questão que em folha de papel A4 você usa impressora comum, realmente e mais simples
minha duvida e em impressora de etiqueta mesmo tipo Zebra,Brother elas tem um sensor que identifica o fim da etiqueta
por isso minha duvida

não sei se mando varias copias
  PrintDocument.PrinterSettings.Copies = 2

ou se envio 2 X para impressora
EX imprimir e depois imprimir novamente

Deus e o maior dos Programadores, ele criou tudo em liguagem visual
                                           .... e viu Deus que era bom


 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário