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

    Importar PDF para Txt

    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 753
    Registrado : 29/08/2012

    Importar PDF para Txt Empty Importar PDF para Txt

    Mensagem  Clebergyn Seg 13 Jul 2020, 10:15

    Bom dia Amigos!

    Uma forma de converter PDF para TXT

    Baixando o programa: XPDF no site "procure no google (não pode colocar link aqui)" seria http www(ponto)xpdfreader(ponto)com/download(ponto)html
    e também as suas ferramentas (apos baixar as ferramentas, salve elas na pasta do sistema e depois você vai usar o arquivo pdftotext.exe na função abaixo)

    e usando o código abaixo:

    Código:
    Private Sub PdfToText(ByVal PdfPath As String, ByVal TextPath As String)
    Const PathToPdfToText As String =  "path\pdftotext.exe" 'adicione o endereço onde esta o arquivo pdftotext.exe
    With CreateObject("wscript.shell")
      .Run Chr(34) & PathToPdfToText & "pdftotext.exe" & Chr(34) & " " & Chr(34) & PdfPath & Chr(34) & " " & Chr(34) & TextPath & Chr(34), 1, 1
    End With
    End Sub

    use a função assim:  PdfToText arquivo.pdf, arquivo.txt

    Obs: lembrando que o caminho do  arquivo.txt tem que ser com poucas pastas, se for um caminho tipo:c:\dados\arquivo1\arquivo2\arquivo.txt comigo nao funcionou o código
    agora se colocar: c:\arquivo\arquivo.txt  assim com poucas pastas no diretório funcionou

    lembrando também, que pdf provindo de fotos ou scaneamentos (em forma de figura) não vai gerar direito o arquivo texto.

    espero que ajude galera!

    Bons estudos!


    Última edição por Clebergyn em Sex 24 Jul 2020, 21:12, editado 1 vez(es)
    ahteixeira
    ahteixeira
    Moderador Global
    Moderador Global

    Respeito às regras : Respeito às Regras 100%

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

    Importar PDF para Txt Empty Re: Importar PDF para Txt

    Mensagem  ahteixeira Seg 13 Jul 2020, 14:01

    Olá Cleber Botelho,

    Obrigado pela partilha da "dica", o fórum agradece.

    Abraço
    avatar
    Clebergyn
    Super Avançado
    Super Avançado

    Respeito às regras : Respeito às Regras 100%

    Sexo : Masculino
    Localização : Brasil
    Mensagens : 753
    Registrado : 29/08/2012

    Importar PDF para Txt Empty Re: Importar PDF para Txt

    Mensagem  Clebergyn Seg 13 Jul 2020, 16:59


    ...valeu mais pelo grande apoio de vocês e do fórum...

    ...mas se alguém achar uma solução melhor, ou se souberem usar este recurso melhor postem aqui gente, estamos ai para aprender...

      Data/hora atual: Qua 04 Ago 2021, 13:38