Para imprimir direto na impressora localmente usamos o seguinte código, sem depender do objeto Printer:
Open "LPT1:" For Output As #1
Print #1, "Código: " & Codigo
Print #1, "Nome: " & Nome
Close #1
Porém podemos usar esse recurso de abrir a porta da impressora pela rede, é muito simples, temos apenas que repetir o código acima subtituindo o "LPT1:" pelo caminho compartilhado da impressora na rede:
Open "\NomeMaquinaRemotaNomeImpressoraRemota" For Output As #1
Print #1, "Código: " & Codigo
Print #1, "Nome: " & Nome
Close #1
Onde:
• NomeMaquinaRemota = nome ou IP da máquina onde está instalada a impressora;
• NomeImpressoraRemota = nome dado a impressora no compartilhamento.
Pronto, feito isso pode se imprimir diretamenta na impressora, sem depender de nenhum gerenciador de impressão do Sistema Operacional.
Open "LPT1:" For Output As #1
Print #1, "Código: " & Codigo
Print #1, "Nome: " & Nome
Close #1
Porém podemos usar esse recurso de abrir a porta da impressora pela rede, é muito simples, temos apenas que repetir o código acima subtituindo o "LPT1:" pelo caminho compartilhado da impressora na rede:
Open "\NomeMaquinaRemotaNomeImpressoraRemota" For Output As #1
Print #1, "Código: " & Codigo
Print #1, "Nome: " & Nome
Close #1
Onde:
• NomeMaquinaRemota = nome ou IP da máquina onde está instalada a impressora;
• NomeImpressoraRemota = nome dado a impressora no compartilhamento.
Pronto, feito isso pode se imprimir diretamenta na impressora, sem depender de nenhum gerenciador de impressão do Sistema Operacional.
Comentários
Postar um comentário