bollywood actresses hair loss hair rehab london contact number cheap hair extensions brazilian curly hair with closure hair extension fails human hair wigs black ponytail hairstyles 2018 sunny hair extensions uk hair extensions remy hair extensions weft koko one piece hair extensions clip hair
Imprimir direto para a porta da impressora
Imprimir direto para a porta da impressora

Nota importante: para ter acesso aos vídeos e arquivos exemplos deste site, adquira um dos planos apresentados abaixo. Você pode comprar em até 2x no Cartão de Crédito. 

Veja como comprar e saiba mais sobre o material oferecido,  clicando aqui.

Open v3

 

a) Para uma impressora que utiliza a porta LPT1

'Enviar um arquivo txt direto para a porta LPT1
Open "LPT1" For Output As #1
   Print #1, "Impressão de teste"
Close #1

b) Para uma impressora que utiliza a porta USB

Primeiro devemos compartilhar a impressora na rede.  Como compartilhar?

- Abra o Iniciar do Windows e clique na opção dispositivos e impressoras.

- Clique com o botão direito do mouse sobre o nome da impressora que deseja compartilhar e assinale o item Propriedades de impressora

Usando Access - propriedades de impressora

- Clique na aba Partilha, marque Partilhar esta impressora e digite um nome para a impressora.   Observe na imagem abaixo:

Usando Access - Partilhar impressora

Agora, basta indicar na instrução OPEN, o nome do computador que compartilha a impressora, bem como o nome da impressora.

'Enviar um arquivo txt direto para a impressora compartilhada
Open "\\W764Serv\Tx420w" For Output As #1
   Print #1, "Impressão de teste"
Close #1
 
'w764serv é o nome do computador que compartilha a impressora
'Tx420W é o nome dado à impressora compartilhada, conforme você pôde observar
'na imagem acima

Bom estudo!


 

 


6 comentário(s)

JOAO PAULO PEREIRA DA SILVA   08/02/2019 08:15:35

O Link passado como a solução do problema esta indisponível, teria como alguém pode informar qual a solução, pois estou com o mesmo problema?

Samuel   17/07/2018 05:45:20

O Link passado como a solução do problema esta indisponivel, teria como alguem me informar qual a solução, pois estou com o mesmo problema?

Egnaldo   06/01/2018 03:12:23

Estava tendo o mesmo problema, solução tambem deu certo para mim, obrigado!

Avelino Sampaio   05/01/2018 11:07:13

Carlos,

obrigado pelo feedback.

Carlos Reis   05/01/2018 09:43:52

Achei a resposta aqui:

http://comunidade.itlab.com.br/eve/forums/a/tpc/f/273606921/m/7577013253?r=7177014083#7177014083

Carlos Reis   05/01/2018 08:28:24

Teríamos que atualizar essa dica aqui pois com o aumento da segurança nos Windows mais atuais, eu tenho passado por uma situação diferente. Toda vez que mando imprimir diretamente pra impressora na rede, aparece a seguinte mensagem de erro:

Erro em tempo de execução '75':

Erro de acesso a caminho/arquivo

Mandando imprimir pelo Windows, vai normalmente mas pelos comandos abaixo, dá esse erro demonstrado acima.

Dim PortImp As String
PortImp = "\\SERVICE-PC\HPLASER"

Open PortImp For Output As #1

Print #1, "impressão teste"
Print #1, ""
Print #1, "ESSA LINHA É UM TESTE "
Print #1, ""
Print #1, "Fim do teste!"
Close #1

Alguém sabe o que temos que fazer nas propriedades dessa impressora para que ela permita impressão direta pelo comando "Open"?


Envie seu comentário: