Link Search Menu Expand Document

Extract Text By Pages from PDF - VBScript

PDF Extractor SDK sample in VBScript demonstrating ‘Extract Text By Pages from PDF’

' Create Bytescout.PDFExtractor.TextExtractor object
Set extractor = CreateObject("Bytescout.PDFExtractor.TextExtractor")
extractor.RegistrationName = "demo"
extractor.RegistrationKey = "demo"

' Load sample PDF document

' 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

' 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

Download Source Code (.zip)

Return to the previous page Explore PDF Extractor SDK