عاااااجل : القراءة من ملف PDF

mbc321 كتب:

لدي ملف pdf اريد استراد الملف pdf الى جدول ياليت احد يساعدني او اذا وجد كود يقوم بتحويل ملف pdf الى ملف نصي.

اخي الفاضل

السلام عليكم ورحمة الله وبركاته

لا يوجد لدينا اكواد في قاعدة البيانات اكسيس تحول من PDF الى Text

ولكن يوجد مواقع Online وبرامج جاهزه تستطيع التحويل الى عدة صيغ تريدها

تحويل PDF الى Excel

Convert PDF to Excel Free Online

http://www.pdftoexcelonline.com

http://www.convertpdftoexcel.net

برنامج تحويل Convert PDF to Excel

وإن رغبت في تحويل ملف PDF الى عدة صيغ مثل Text, Images, Word, Excel فإليك هذه المواقع Online

http://www.cometdocs.com

http://www.newocr.com

بالتوفيق

وجدت هذا الكود ياليت احد يعدل عليه

Dim AcroXApp As Object

Dim AcroXAVDoc As Object

Dim AcroXPDDoc As Object

Set AcroXApp = CreateObject("AcroExch.App")

AcroXApp.Hide

Set AcroXAVDoc = CreateObject("AcroExch.AVDoc")

AcroXAVDoc.Open PDF_PATH & filename, "Acrobat"

AcroXAVDoc.BringToFront

Set AcroXPDDoc = AcroXAVDoc.GetPDDoc

Dim jsObj As Object

Set jsObj = AcroXPDDoc.GetJSObject

jsObj.SaveAs OUTPUT_PATH & OutputFile, "com.adobe.acrobat.plain-text"

AcroXAVDoc.Close False

AcroXApp.Hide

AcroXApp.Exit