[Resolvido]impressão sem salto

Bom Dia!
Alguem sabe como que eu faço para fazer uma impressão sem salto...
Exemplo como se fosse um carimbo..
ou uma autentificação...

Seria numa impressora Bematech

Obrigada...

Impressão sem salto? Nunca vi uma impressora saltitante. Brincadeirinha

Fale um pouco mais sobre o fenômeno por gentileza

Claro...

Preciso fazer um impressão, seria mais ou menos uma linha, q depois da impressão ela fique parada no lugar entende...
na realidade eu quero colocar um documento e autenticar...como se faz no banco, qdo pagamos um conta e a nossa via a autentificada.
deu para entender

Entendi. Não seria possível fazer isso no Access mesmo? Ou se você precisa imprimir no Word depois dessa linha, talvez dê para exportar a linha para o documento do Word, de forma que fique tudo em um mesmo documento.

Desculpem , mas este tópico deve vir para cá. O colega devia procurar na ajuda da marca da impressora ou num fórum sobre estes temas, pois parece-me que será difícil obter ajuda aqui.

pq vc acha q eu n posso obter ajuda aqui, já q o codigo para impressão eu peguei aqui...neste forum...

Mas tudo bem...

Vanessa, fale-nos mais sobre o processo. Você precisa imprimir uma linha no Access e parar a folha para imprimir novamente à partir de outra fonte, é isso mesmo?

Código para a impressão? Desculpe mas a sua dúvida inicial não era, que eu sei ler português. Se mudou a versão da pergunta diga-me por favor, para alterar "impressão sem salto" para um título conveniente. Por outro lado faz menção á marca de uma impressora, como se procura-se ajuda para essa marca específica

Criquio

Se vires que o assunto consegues resolver aqui, faz o favor de enviar este poste para a sala de onde foi retirado, mas muda o título, por favor para facilitar a pesquisa no fórum. Obrigado a ambos.

ok

Boa Noite Vanessa,

Não sei como está o codigo de imprimir,

mas se o codigo de impressão for direto para a mesma,

dá pra fazer dois Pauses com Um Msgbox.

Seria mais ou menos Assim:

'Habilite um dos dois codigos abaixo para teste

'Open "C:\TesteImpressao.txt" For Output As #1 ' Habilite para um arquivo texto

'Open "Lpt1:" For Output As #1 ' Habilite para ir direto p/ Impressora na porta Lpt1


'aqui eu defino qual o tamanho do espaçamento
'48 = 1/8 - inch line spacing
'49 = 7/72 - inch line spacing
'50 = 1/6 - inch line spacing

Print #1, Chr(27); Chr(48);
Print #1, "Linha1"
Print #1, "Linha2"

Dim teste As String
teste = "Autentica"

If MsgBox("Deseja Autenticar o Documento?", vbYesNo) = vbYes Then
MsgBox "Introduza o Documento e clique em OK"
Print #1, teste 'Variavel da Autenticação
MsgBox "Retire o Documento Autenticado e Clique em OK"
Else
Print #1, "Pula a condição e imprime o resto"
End If

Print #1, "Linha3"
Print #1, "Linha4"

Print #1, "Linha5"


Sds,

Olá Vanessa, bom dia!

Peço que evite a escrita conhecida como "msn". Tente escrever em Português OK!

Não me leve a mal, pois é minha atribuíção orientar.

Também, é um bem ao fórum, enquanto veículo de comunicação.

Cumprimentos!

Boa tarde !

Vi o exemplo acima !!!
mas mesmo assim ainda esta pulando uma linha

o codigo e esse

Open "LPT1:" For Output Access Write As #1
Print #1, Tab(0); "LMC" & Me.[CdAuxiliar]; Me.[datac]; " " & "R$"; Format$(Format$(Me.[soma], "#,##0.00"), "@@@@@@@@"); Me.[NM]; Format$(Format$(Me.[TpPagamento], "0000"), "@@@@");

comando de corte
'Print #1, Chr(27) + "i"

assim imprime e pula linha
mas n queria q pula-se linha
obrigada

Vanessa como você não disponibilizou o código

fica complicado de entender.

Autenticar no meio de uma Impressão??

De que impressora estamos falando?

Em Impressora matricial, não sei se há como retornar o carro.

Tente usar Chr(27) & Chr(13) para ver se consegue o efeito.

Ou Chr(10) & Chr(13).

O que daria pra fazer é ela aguardar dois Inputs como eu sugeri, já

que você quer a opção de autenticar ou não

Espero ter ajudado

Sds,

a impressora q estou usando e uma bematech

O que eu queria sabe qdo a gente vai no banco fazer um pagamento, a caixa poe nossa fatura e autentica como pagamento, sem salto de linha...
autentifica a via dela
autentifica a nossa via
autentifica a fita...

Será q agora deu para entender..

Seria bom que você nos mostre e o código que você está usando o modelo da impressora para que possamos entender melhor...

A Impressora e a Bematech...

e o codigo q estou usando basicamente e esse:


Open "LPT1:" For Output Access Write As #1

Print #1, Tab(0); "LMC" & Me.[CdAuxiliar]; Me.[datac]; " " & "R$"; Format$(Format$(Me.[soma], "#,##0.00"), "@@@@@@@@"); Me.[NM]; Format$(Format$(Me.[TpPagamento], "0000"), "@@@@");

'comando de corte

Print #1, Chr(27) + "i"


Close #1

Será q da para entender...

Oi Vanessa,

Era pra ser com Chr(13) mesmo, não sei porque não tá dando certo com você

Tenta assim:

Print #1, chr(13) + Tab(0); "LMC" & Me.[CdAuxiliar]; Me.[datac]; " " & "R$"; Format$(Format$(Me.[soma], "#,##0.00"), "@@@@@@@@"); Me.[NM]; Format$(Format$(Me.[TpPagamento], "0000"), "@@@@");

Segue o Link do Manual da Bematech

Manual Bematech

Sds,

vou tentar

Deu certo...

Vc n sabe o qto eu estou feliz....

O erro estava na colocação do codigo q estava colocando depois da linha a ser impressa

Obrigada...

Tu n sabe de tanto eu fazer teste...mudou ate a fonte...

Mas obrigada mesmo....

Vanessapfp

Só precisa agora, evitar escrever palavras conhecidas com "msn", observe as regras do fórum e se esforce para uma boa convivência.

Cumprimentos!