[Resolvido]Parar o papel no final da impressão dos dados

Boas...
Estou com um problema, e não consigo resolver, é o seguinte:


Imprimir um relatório ao final dos dados, ele teria que pular quatro linhas e parar na possição (não continuar avançando o papel na impressora Epson LX-300).

Antecipadamente sou grato pela atenção de todos

Já verificou as configurações da impressora?

Reformulando

Gostaria de Imprimir um relatório no Access(Via VBA) e ao final da impressão dos dados, teria que pular quatro linhas e parar na possição (não continuar avançando o papel na impressora Epson LX-300).

Sim. Mas não dá para configurar o tamanho de papel na impressora e/ou na página do relatório em si? Quando eu usei essa impressora, foi quando trabalhei em um hotel a uns 15 anos atrás e nem mexia ainda com vba.

Não achei nada para configurar nas propriedades da impressora ao que se refere a pular umas quatro linhas e parar no final da impressão dos dados.(Como é nas impressoras fiscais)

Essa opção pelo que entendi vem nas configurações das impressoras fiscais e não nestas.

OK, vem na configuração da impressora mesmo(Cupom Fiscal), mas eu queria algumas dicas de como fazer a parada do papel assim que terminar de imprimir os dados e pular + ou - quatro linhas

Poderia ser em qualquer impressora matricial

Gostaria de o poder ajudar, mas não posso. Pode ser alguém já tenha tido o mesmo problema. por isso vamos manter o tópico por algum tempo em aberto.

Naldo,

Este tipo de impressora é realmente uma encrenca, mas vamos tentar

Como vc. citou a impressora fiscal, creio que está fazendo seu relatório no VBA, então se puder postar o código que está utilizando fica mais fácil de ajuda-lo.

Não conheço nenhum comando para re-posicionar o papel (suponho que seja formulário continuo), então uso um RecordCount para contar as linhas utilizadas e um laço para inserir quantos Print #1, "" forem necessários.

Vai aí uma parte do código que utilizo em um dos meus sistemas:

Código:

If RSB.RecordCount < 12 Then
  Dim i As Integer
        For i = 1 To (12 - RSB.RecordCount)
              Print #1, ""
          Next
End If

Para pular linhas:
Print #1, ""
'Print #1, Chr(27) + "0" 'Espaçamento de linha
'Print #1, Chr(27) + "1" 'Espaçamento de linha
'Print #1, Chr(27) + "2" 'Espaçamento de linha

Jr.
Sou muito grato pela suas dicas, mas me fale uma coisa...
Não teria como voltar(retroceder a folha) a folha até uma posição após a impressão.

Naldo,

Me esclareça uma dúvida, quando vc. disse "...relatório no Access(Via VBA)..." entendi que o relatório foi feito no VBA, mas lendo os demais tópicos, pode ser que seu relatório tenha sido feito direto no design do Access

Se for assim, nesta impressora não é possivel: "...fazer a parada do papel assim que terminar de imprimir os dados e pular + ou - quatro linhas". Vc. só conseguirá isso se fizer o relatório pelo VBA.

Jr.

Exatamente isso, fiz o relatório no design do Access(Por não ter muito conh. em VBA)

Gostaria muito fazer o cupom interno da loja em VBA, pois esta dando muito trabalho ter que ficar possicionando o papel a toda vez que é feito a impressão, quem sabe vc tenha uma luz poderia me ajudar.
Grande ABRAÇO

Dá uma olhada amigão se resolve seu problema..

http://maximoaccess.forumeiros.com/t1106-resolvidoimpressora-nao-fiscal?highlight=impressora


Sds,


Pablo

Naldo,

Para resolver o problema do posicionamento do papel, só fazendo o relatório no VBA. Estude os exemplos do tópico que o Pablo indicou e mão na massa, ou seja, mãos no teclado rsrsrs.

Se tiver alguma dúvida pontual, aqui sempre encontrará quem lhe ajude.

Abraços

Boas..

Jr.

Deu tudo certinho por aqui, menos a droga do papel, ele não para após a impressão dos dados, é mole.....

Será que não teria como criar um botão para deixar o papel em uma posição pré estabelecida para o corte(Isso tudo via botão VBA)

Quando vc. faz o relatório no modo design, tem-se que configurar a pagina, com esta impressora é pior ainda, pois ela não aceita personalização do papel, mas isso não vem ao caso agora, o que interessa é que vc. tem que escolher o tamanho do papel, e a impressora vai jogar o papel para o inicio da próxima pagina, isso não tem como mudar.

Agora, quando vc. faz o relatório pelo VBA, o papel vai parar no final dos prints, então vc. terá como definir aonde quer fazer o corte. E também vc. tem a possibilidade de pular quantas linhas quiser no início da impressão.

Abs,

Isso mesmo Jr

No exemplo que o Pablo postou foi de muita serventia mas não para a impressora após o print.
Quem sabe uma luz no final do túnel.

Mas não vou desistir é questão de honra, rsrsrs


Sou muito grato pela sua atenção Jr e a todos do FORUM

No tópico que o Pablo indicou, pegue o exemplo que o JUNGLI postou: "...ESTE CÓDIGO ENVIA DIRETO PRA LPT1...",
Estude-o e adapte para seu aplicativo

retire do final do código as linhas: comando de corte - Print #1, Chr(27) + "i",

Tenho certeza que vai funcionar do jeito que vc. quer.

Gostei disso: "...não vou desistir..."