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

    Acrescentar PDF em um so

    avatar
    Renato Sobreira Henrique
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 02/03/2015

    Acrescentar PDF em um so Empty Acrescentar PDF em um so

    Mensagem  Renato Sobreira Henrique 2/3/2015, 12:51

    Bom Dia Feras

    queria uma forcinha ai
    tenho um subform com os arquivos PDFs do cliente anexado em minha rede cada cliente tem uma pasta e esta salvo todos os
    documentos dele vinculado com o sistema. E para eu abrir qualquer documento do cliente via sistema o código esta assim:

    On Error GoTo mytrap
    Dim aplicativo As String
    Dim Arquivo As String
    aplicativo = "C:\Arquivos de programas\Adobe\Reader 10.0\Reader\AcroRd32.exe"
    Arquivo = "J:\PUP\" & Forms![PupCliente]!Código & "\" & Forms![PupCliente]![PupRelDoc]!Codigo & ".pdf"
    Me.Requery
    Call Shell(aplicativo & " " & Chr(34) & Arquivo, vbMaximizedFocus)

    esta funcionando perfeitamente abrindo o arquivo que eu quero que esta na minha rede, so que eu queria selecionar mais de um PDF que esta nesse subform Tipo:
    RG
    CPF
    Comp Residencia

    hoje eu faço isso manualmente com o programa GIOS ou o PDFTKBuilderPortable
    adicionando um por um

    ai eu queria fazer isso via sistema "Codigo". Entenderam?

    Alguem poderia dar uma força por favor

    Obrigado




    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Alvaro Teixeira 3/3/2015, 08:17

    Olá, em que parte é que entra:

    RG
    CPF
    Comp Residencia

    1) O que representa?
    2) Caso seja um ficheiro do "tipo" CPF, como era o caminho e nome do ficheiro?

    Ficamos no aguardo.
    Abraço
    avatar
    Renato Sobreira Henrique
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 02/03/2015

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Renato Sobreira Henrique 3/3/2015, 16:08

    Obrigado pela atenção

    então representa a documentação do cliente, o cliente ira trazer os documentos o setor da digitalização ira escanear e salvar na pasta do cliente. Feito isso o setor Juridico tem que anexar alguns documentos em um site especifico ai eles tem que mandar mais de um documento tipo rg e cpf junto
    mas so que digitalizaram por parte
    entendeu?

    ai queria fazer esse negocio de juntar via sistema e nao manualmente

    e o caminho que esta os docs esta na rede em pasta do cliente
    Arquivo = "J:\PUP\" & Forms![PupCliente]!Código & "\" & Forms![PupCliente]![PupRelDoc]!Codigo & ".pdf"

    la tem uma pasta com o codigo do cliente e dentro dessa pasta esta os arquivos PDFs do cliente
    entendeu???

    Help por favor

    Obrigado
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Alvaro Teixeira 3/3/2015, 16:38

    Ola, mesmo assim não está claro.
    Será melhor exemplificar o nome dos arquivos que um cliente tem, e dos vários tipos.
    Localizaçao e forma que tem para aceder:
    1) leitura de um pasta; ou
    2) base dados com caminho e nome do arquivo?
    No aguardo
    avatar
    Renato Sobreira Henrique
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 02/03/2015

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Renato Sobreira Henrique 4/3/2015, 12:55

    Vamos ver se consigo detalhar mais pra vcs
    Tipo o cliente: João Batista ele trouxe os documentos "RG, CPF, Carteira de Trabalho, Comprovante de Residencia, entre outros..."
    Os documentos estao em um subf continuo correto?

    e os documentos estao sendo salvos nesse caminho:
    J:\PUP\272\1.pdf
    J:\PUP\272\2.pdf

    o caminho é o seguinte:
    J - Nossa Rede Interna
    PUP - Pasta Padrao, nunca vai mudar
    272 - Codigo do Cliente - "João Batista"
    1 - Codigo do Doc - "RG"

    fiz o vinculo pelo o codigo pq nunca vai mudar e nunca perde o vinculo

    e para abrir documento por documento criei esse codigo no evento Ao Clicar 2x

    On Error GoTo mytrap
    Dim aplicativo As String
    Dim Arquivo As String
    aplicativo = "C:\Arquivos de programas\Adobe\Reader 10.0\Reader\AcroRd32.exe"
    Arquivo = "J:\PUP\" & Forms![PupCliente]!Código & "\" & Forms![PupCliente]![PupRelDoc]!Codigo & ".pdf"
    Me.Requery
    Call Shell(aplicativo & " " & Chr(34) & Arquivo, vbMaximizedFocus)

    ele esta abrindo certinho. Agora queria juntar mais de um PDF clicando em uma caixa de seleção "Selecionar PDF"
    Tipo:
    RG = True
    CPF = True

    e queria que juntasse os 2 pdf em 1 so e abrisse na tela para eu salvar onde eu quisesse ou salvasse na mesma pasta do cliente com outro nome
    entendeu?

    Se não fui claro posso detalhar mais se preferir

    Obrigado pela força

    Abraços

    avatar
    Renato Sobreira Henrique
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 02/03/2015

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Renato Sobreira Henrique 4/3/2015, 12:58

    esqueci de falar para juntar os PDFs faço isso manualmente com os programas
    Gios, PDFTKBuilderPortable ou Acrobat

    Abraços
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Alvaro Teixeira 4/3/2015, 14:25

    Olá , já compreendi o que pretende, não tenho conhecimento de nehuma app, via vba que efetue o pretendido.
    Outra solução poderá ser em criar "tipos de documentos" exemplo:

    J:\PUP\272\RG1.pdf
    J:\PUP\272\CPF1.pdf
    J:\PUP\272\RG2.pdf ...

    Aí poderia ter uma listagem a mostra os ficheiros disponiveis por tipo de documento (a selecção seria pelo inicio do nome do ficheiro)
    O utilizador ao clicar abria o ficheiro pretendido.
    o utilizador também podia ter um botão para adicionar ficheiros novos ao processo, sendo gravado na respectiva pasta com a nomenclatura estipulada.

    Abraço
    avatar
    Renato Sobreira Henrique
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 02/03/2015

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Renato Sobreira Henrique 4/3/2015, 16:08

    Entendi.
    Mas muito obrigado pela sua atenção, fico no aguarde de alguem com alguma solução
    e quando eu souber a resposta postarei aqui

    Mais uma vez obrigado

    Abraços
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Alvaro Teixeira 4/3/2015, 17:10

    Obrigado pelo retorno, ficamos aguardar se algum colega apresenta outra solução.
    Abraço
    avatar
    Renato Sobreira Henrique
    Novato
    Novato


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 6
    Registrado : 02/03/2015

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Renato Sobreira Henrique 6/3/2015, 01:42

    E ai Feras
    dando uma olhada na net encontrei um exemplo parecido o que eu preciso vai o link
    http://maximoaccess.forumeiros.com/t10231-mesclar-dois-pdf-s-em-um-juncao-de-arquivos-no-formato-pdf

    ele faz a junção de pdf so que o problema é que ele junta somente 2 PDFs e queria quantos eu quisesse
    vou ver se encontro uma solução nesse sistema que achei.

    Se alguem tiver alguma solução estarei sempre disposta a ouvi los

    Obrigado
    Alvaro Teixeira
    Alvaro Teixeira
    Moderador Global
    Moderador Global


    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Portugal
    Mensagens : 7919
    Registrado : 15/03/2013

    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Alvaro Teixeira 11/3/2015, 21:51

    Olá Renato, parece que com esse codigo consegue fazer o que pretende!
    Terá é que efetuar por etapas, imagine:

    Tem 4 ficheiros para juntar, sendo eles:

    A.pdf
    B.pdf
    C.pdf
    D.pdf

    Então se o codigo junta dois terá que fazer:

    A.pdf + B.pdf = AB.pdf (1ª junção)
    AB.pdf + C.pdf = ABC.pdf (2ª junção)
    ABC.pdf + D.pdf = ABCD.pdf (3ª e ultima junção)

    Ou seja, terá que efetuar um loop ou for ou ... o numero de vezes que é igual número de ficheiros pdf - 1,
    neste exemplo 4-1 = 3 vezes repetir a junção.

    Abraço

    Conteúdo patrocinado


    Acrescentar PDF em um so Empty Re: Acrescentar PDF em um so

    Mensagem  Conteúdo patrocinado


      Data/hora atual: 29/4/2024, 09:35