With this source code sample you may quickly learn how to extract text by pages from PDF in VBScript. ByteScout PDF Extractor SDK: the Software Development Kit (SDK) that is designed to help developers with data extraction from unstructured documents like pdf, tiff, scans, images, scanned and electronic forms. The library is powered by OCR, computer vision and AI to provide unique functionality like table detection, automatic table structure extraction, data restoration, data restructuring and reconstruction. Supports PDF, TIFF, PNG, JPG images as input and can output CSV, XML, JSON formatted data. Includes full set of utilities like pdf splitter, pdf merger, searchable pdf maker. It can extract text by pages from PDF in VBScript.
VBScript code samples for VBScript developers help to speed up coding of your application when using ByteScout PDF Extractor SDK. This VBScript sample code is all you need for your app. Just copy and paste the code, add references (if needs to) and you are all set! Implementing VBScript application typically includes multiple stages of the software development so even if the functionality works please test it with your data and the production environment.
Free trial version of ByteScout PDF Extractor SDK is available on our website. Documentation and source code samples are included.
' Create Bytescout.PDFExtractor.TextExtractor object Set extractor = CreateObject("Bytescout.PDFExtractor.TextExtractor") extractor.RegistrationName = "demo" extractor.RegistrationKey = "demo" ' Load sample PDF document extractor.LoadDocumentFromFile("..\..\sample2.pdf") ' Get page count pageCount = extractor.GetPageCount() For i = 0 To pageCount - 1 fileName = "page" & i & ".txt" ' Save extracted page text to file extractor.SavePageTextToFile i, fileName Next ' Open first output file in default associated application Set shell = CreateObject("WScript.Shell") shell.Run "page0.txt", 1, false Set shell = Nothing Set extractor = Nothing