MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração


Participe do fórum, é rápido e fácil

MaximoAccess

Caro Usuário, antes de postar pela primeira vez, leia as regras do fórum.

https://www.maximoaccess.com/t48-regras-do-forum

Obrigado

Administração

MaximoAccess

Gostaria de reagir a esta mensagem? Crie uma conta em poucos cliques ou inicie sessão para continuar.

Dicas Ms Access, Exemplos Ms Access, Codigos VBA Ms Access, SQL Ms Access


2 participantes

    [Resolvido]Impressão Direto LPT1

    Macedo
    Macedo
    Macedo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 23/09/2010
    • Mensagem nº1

    [Resolvido]Impressão Direto LPT1 Empty Impressão Direto LPT1

    Mensagem  Macedo 17/12/2011, 23:25

    Amigos do Forum estou passando um trecho do código que imprime cheque direto pela porta lpt1

    Open "LPT1" For Output As #1
    strTexto = "R$" & Format(rst![ValorDoCheque], "Standard") & "**"
    strImprimir = Space(66 - Len(strTexto)) & strTexto
    Print #1, strImprimir
    Print #1,

    Como faço para pular uma linha com um espaço menor do que Print #1, pois com esse comando pula um espaço muito grande e a segunda linha fica fora do formato do cheque.

    um abraço a todos.
    • Ir para o topo
    criquio
    criquio
    criquio
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 11229
    Registrado : 30/12/2009
    • Mensagem nº2

    [Resolvido]Impressão Direto LPT1 Empty Re: [Resolvido]Impressão Direto LPT1

    Mensagem  criquio 17/12/2011, 23:31

    Olá! Veja se ajuda: https://www.google.com/search?hl=pt&q=Print+AND+LPT1+site%3Amaximoaccess.forumeiros.com&btnG=Pesquisar


    .................................................................................
    Meu novo site: www.vcssistemas.com.br
    Clique aqui e veja um vídeo que explica como fazer pesquisas no forum.

    DICA: Quando precisar inserir um exemplo do seu aplicativo, siga os procedimentos abaixo:
    1 - faça uma cópia do aplicativo
    2 - retire tudo que não for necessário à solução do problema, exceto o que o aplicativo precisar para funcionar
    3 - use o Compactar/Reparar
    4 - compacte o aplicativo em zip ou rar (zip para postagem como anexo na mensagem)

    Agradeça a quem lhe ajudou, clicando no joinha de uma das mensagens do usuário.
    Positive as mensagens que achar útil, no canto superior direito delas.
    • Ir para o topo
    Macedo
    Macedo
    Macedo
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 76
    Registrado : 23/09/2010
    • Mensagem nº3

    [Resolvido]Impressão Direto LPT1 Empty Re: [Resolvido]Impressão Direto LPT1

    Mensagem  Macedo 18/12/2011, 03:25

    Ajudou e muito, obrigado.
    • Ir para o topo
    Conteúdo patrocinado

    Conteúdo patrocinado


    • Mensagem nº4

    [Resolvido]Impressão Direto LPT1 Empty Re: [Resolvido]Impressão Direto LPT1

    Mensagem  Conteúdo patrocinado

    • Ir para o topo
      Data/hora atual: 9/5/2024, 00:32