PC SOFT

PROFESSIONAL NEWSGROUPS
WINDEVWEBDEV and WINDEV Mobile

Home → WINDEV 25 → Wx - Extraindo Texto de PDF
Wx - Extraindo Texto de PDF
Started by adrianoboller, Aug., 31 2015 8:14 PM - No answer
Registered member
3,659 messages
Popularité : +175 (223 votes)
Posted on August, 31 2015 - 8:14 PM




//Extraindo Texto de PDF

VarArquivois string

VarArquivo= fImageSelect(EdtArqPdf,"","Selecione PDF...","PDFs"+TAB+"*.PDF")

IF tmpArq<>"" THEN

Edt_ArqPdf = VarArquivo // mostra o nome do arquivo na tela

ImgPDF = VarArquivo // mostra o PDF na tela

StaTextoDoPDF = PDFToText(tmpArq,"1") // extrai texto pg 1

END

//EdtArqPDF é um campo de edição, ImgPDF é um campo imagem e StaTextoDoPDF é um campo estático.
//Assim voce esta a decompor o pdf em txt e guardar somente o texto na base de dados, cada um em seu campo
//Pesquise dai no seu Nvarchar(max)
//como like do sql a informação