MaximoAccess

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

Obrigado

Administração do MaximoAccess

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

    [Resolvido]relatorio nao gera em PDF

    maguim
    maguim
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 446
    Registrado : 15/05/2013

    [Resolvido]relatorio nao gera em PDF Empty [Resolvido]relatorio nao gera em PDF

    Mensagem  maguim em Ter Maio 07, 2019 9:47 am

    bom dia amigos tudo bem?


    estou com impasse no momento que nao esta gerando pdf, estou com access 2016

    estava lendo mais coisa respeito aplicaquei varios teste, porem sem exito.

    esta dando erro 2501

    ação outpuTO foi cancelada.

    segue o codigo abaixo:
    Código:

    DoCmd.OpenReport "ContratoComercial", acViewPreview, , , acWindowNormal 'este codido precisa ficar aqui por alguma razão, pois buga o botão estou tentado descobrir

    Dim strArquivo As String
    Dim strLocal As String
    Dim path As String



    path = DLookup("Razão_Social", "TABELA_CONTRATO", "CODPASTA=" & Forms!IMPRIMIR_CONTRATO!CODPASTA)

    ' nome do arquivo a ser salvo      chave prima
    strArquivo = "Contrato_" & path & ".pdf"

    ' criar essa pasta onde está o banco de dados
    strLocal = CurrentProject.path & "\enviados\" & strArquivo
     
    'Abre o relatório devidamente filtrado e oculto
    DoCmd.OpenReport "ContratoComercial", acViewPreview, , , acHidden
     

    'Gera arquivo pdf do relatório previamente aberto e filtrado.
    DoCmd.OutputTo acOutputReport, "ContratoComercial", acFormatPDF, strLocal
     
    'Fecha o relatório
    DoCmd.Close acReport, "ContratoComercial"


    Me.Visible = False

    se alguem puder dar uma luz

    abraços


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    maguim
    maguim
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 446
    Registrado : 15/05/2013

    [Resolvido]relatorio nao gera em PDF Empty Re: [Resolvido]relatorio nao gera em PDF

    Mensagem  maguim em Ter Maio 07, 2019 12:54 pm

    alguem pra dar um luz?


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised
    maguim
    maguim
    Avançado
    Avançado

    Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 446
    Registrado : 15/05/2013

    [Resolvido]relatorio nao gera em PDF Empty Re: [Resolvido]relatorio nao gera em PDF

    Mensagem  maguim em Qua Maio 08, 2019 10:51 am

    bom gente finalmente consegui resolver


    o problema estava na pasta destino que nao estava sendo encontrato por isso o erro,

    Código:
    ' criar essa pasta onde está o banco de dados
    strLocal = CurrentProject.path & "\enviados\" & strArquivo



    troquei o nome e coloquei pasta nova e resolveu


    resolvido abraços


    .................................................................................
    O conhecimento é a Dadiva da Vida. Sem ele o que seriamos ?! Surprised

      Data/hora atual: Sex Maio 29, 2020 1:24 pm