Lectura del TEXTO desde archivo PDF

[jnavas]

Saludos
Necesitamos leer el contenido del texto de un archivo PDF, necesario para lectura de asientos contables, el usuario desea evitar la transcripción de miles de asientos contables.

[Jimmy]

hi,

as i can say you need to extract TEXT from PDF

there are Tools, like xPDFreader, which can extract TEXT from PDF
https://www.xpdfreader.com/download.html
---
you can use Source of xPDFreader and try to use it direct under harbour

[Antonio Linares]

open source:

https://en.wikipedia.org/wiki/Pdftotext

[nageswaragunupudi]

This may not work with complex pdfs but works with simple pdfs
No harm trying

Code: Select all | Expand

function pdf2txt( cPdf, cTxt )

   local oWord := WinWordObj()
   local oDoc

   cPdf  := cFileSetExt( cPdf, "pdf" )
   if File( cPdf )
      cPdf  := TrueName( cPdf )
      DEFAULT cTxt := cFileSetExt( cPdf, "txt" )

      oDoc  := oWord:Documents:Open( cPdf )
      oDoc:SaveAs2( cTxt, 2 ) // wdFormatText )
      oDoc:Close()

      FW_MEMOEDIT( cTxt )
   else
      ? cPdf + " not found"
      cTxt  := nil
   endif

return cTxt