PRINT / LPT1

USUARIO.EXCLUIDOS 08/06/2007 14:26:58
#220395
Boa Tarde pessoal. Preciso da ajuda de vocês.

Estou imprimindo um Controle Bancário através do comando Print #1, direto para a porta lpt1.

Imprime tudo perfeito. O problema é que a tela fica "presa" até o término da impressão. Se o número de itens é grande, o computador fica parado até finalizar a dita. Tá parecendo DOS.

Uso um for/next para imprimir todos os itens e depois dou Close #1. Tentei colocar DoEvents, mas não resolveu.

O layout é mais ou menos este:

cabeçalho

itens
...
.
..
.
.
.
..

rodape

Alguém poderia me ajudar?

Vlw.
USUARIO.EXCLUIDOS 08/06/2007 14:53:57
#220401
Então quer dizer que dancei mesmo?
FUTURA 08/06/2007 14:55:19
#220402
VC INSTALOU UMA MATICIAL NO WINDOWS USANDO A LPT1 ?, EU RESOLVI ESTE PROBLEMA ASSIM.
USUARIO.EXCLUIDOS 08/06/2007 15:05:36
#220404
Sim, instalei pelo windows e utiliza a lpt1.
USUARIO.EXCLUIDOS 08/06/2007 17:49:20
#220430
Resposta escolhida
Cara a solução é a seguinte:

'crie um arquivo texto
Open "c:\RELA.TXT" For Output As #1
print #1, "teste"
close #1

'e coloque esse codigo para imprimir via dos
Shell Environ$("COMSPEC") & " /C COPY RELA.TXT PRN", VbHide

'***IMPORTANTE***
DEPENDE A VERSAO DO WINDOWS DEVE-SE COMPILAR O PROGRAMA FONTE PARA O CODIGO SHELL FUNCIONAR.

USUARIO.EXCLUIDOS 08/06/2007 19:48:13
#220444
FNANDOOD,

Obrigado pela sua resposta.

Infelizmente o shell não funcionou nem no modo de projeto nem compilado (exe).

Será que estou fazendo algo errado?
USUARIO.EXCLUIDOS 09/06/2007 11:05:11
#220475
FNANDOOD,

Testei desse jeito no WinXP e funcionou:

Shell Environ$("COMSPEC") & " /C COPY C:\RELA.TXT PRN", VbHide

Vou testar se funciona no Win98 também. Depois te dou uma resposta.

Vlw.
USUARIO.EXCLUIDOS 09/06/2007 11:15:32
#220477
COMPILA O PROGRAMA E EXECUTA ELE COMPILADO QUE FUNCIONA.
USUARIO.EXCLUIDOS 11/06/2007 10:41:35
#220635
FNANDOOD,

Como disse para você, no Win XP funcionou beleza.

Testei hoje no Win98 e trava o computador inteiro. Só desligando e ligando novamente. O que será que pode estar acontecendo?

Vlw.
Página 1 de 2 [13 registro(s)]
Tópico encerrado , respostas não são mais permitidas