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]Erro ao tentar gerar RLT em PDF

    avatar
    victor.zero
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 16/02/2012

    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Erro ao tentar gerar RLT em PDF

    Mensagem  victor.zero 1/11/2012, 16:53

    Saudações

    estou a utilizar o seguinte cod.

    Dim strArquivo As String
    Dim strLocal As String

    strArquivo = "frm_CDT_Programacao1" & Me.Pesquisar & ".pdf"
    strLocal = CurrentProject.Path & "Y:\Zero\Teste\Zero_System_Teste\Programacao" & strArquivo

    DoCmd.OutputTo acOutputReport, "rl_Programação_Fria", acFormatPDF, strLocal

    mais dar erro
    o formato no qual você está tentando emviar o objeto atual não está disponivel.

    como posso resolver.
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Re: [Resolvido]Erro ao tentar gerar RLT em PDF

    Mensagem  Avelino Sampaio 1/11/2012, 16:57

    Atualize seu Office 2007 com o pacote de atualização Sp3



    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    victor.zero
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 16/02/2012

    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Re: [Resolvido]Erro ao tentar gerar RLT em PDF

    Mensagem  victor.zero 1/11/2012, 17:25

    Esse seria o problema.
    Avelino Sampaio
    Avelino Sampaio
    Developer
    Developer


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 3900
    Registrado : 04/04/2010

    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Re: [Resolvido]Erro ao tentar gerar RLT em PDF

    Mensagem  Avelino Sampaio 1/11/2012, 18:16

    na maioria das vezes, sim. A versão primeira do Access 2007 não veio com esta opção de gerar PDF. Somente nos pacotes de atualizações que habilitaram.

    Sucesso!


    .................................................................................
    Vídeos, livros, kit MontaRibbons e acesso vitalício ao site UsandoAcces  
    Clique AQUI e analise o custo beneficio do material oferecido.
    avatar
    victor.zero
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 16/02/2012

    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Re: [Resolvido]Erro ao tentar gerar RLT em PDF

    Mensagem  victor.zero 6/11/2012, 11:13

    Saudações

    Fiz a Atualização e usei o seguinte cod. e funcionou

    DoCmd.OutputTo acOutputReport, "rl_Programação_Fria", acFormatPDF, "Z:\Zero_System\Programacao\Programação.pdf"

    Mais quero usar da seguinte forma, mais não ta funcionando (A ação Outpunt foi Cancelada), onde posso estar errando.

    Dim strArquivo As String
    Dim strLocal As String

    strArquivo = "Programação" & "_" & Format$(Now(), ddmmyyyy) & ".pdf"
    strLocal = "Z:\Zero_System\Programacao\" & strArquivo

    'Gera arquivo pdf do relatório previamente aberto.
    DoCmd.OutputTo acOutputReport, "rl_Programação_Fria", acFormatPDF, strLocal

    'Fecha o relatório
    DoCmd.Close acReport, "rl_Programação_Fria"



    avatar
    victor.zero
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 16/02/2012

    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Re: [Resolvido]Erro ao tentar gerar RLT em PDF

    Mensagem  victor.zero 6/11/2012, 11:38

    Fiz a Seguinte Alteração e Funcionou.

    Dim strArquivo As String
    Dim strLocal As String

    strArquivo = "Programação" & "_" & Format$(Now(), "ddmmyyyy hhnn")
    strLocal = "Z:\Zero_System\Programacao\" & strArquivo & ".pdf"

    'Gera arquivo pdf do relatório previamente aberto.
    DoCmd.OutputTo acOutputReport, "rl_Programação_Fria", acFormatPDF, strLocal

    'Fecha o relatório
    DoCmd.Close acReport, "rl_Programação_Fria"
    avatar
    victor.zero
    Intermediário
    Intermediário


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 97
    Registrado : 16/02/2012

    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Re: [Resolvido]Erro ao tentar gerar RLT em PDF

    Mensagem  victor.zero 6/11/2012, 15:06

    OK

    Conteúdo patrocinado


    [Resolvido]Erro ao tentar gerar RLT em PDF Empty Re: [Resolvido]Erro ao tentar gerar RLT em PDF

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 22/11/2024, 05:01