Link Search Menu Expand Document

Extract Images from PDF - VBScript

PDF Extractor SDK sample in VBScript demonstrating ‘Extract Images from PDF’

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

' Load sample PDF document

i = 0

' Initialize image enumeration
If extractor.GetFirstImage() Then
        outputFileName = "image" & i & ".png"
        ' Save image to file
        extractor.SaveCurrentImageToFile outputFileName
        i = i + 1
    Loop While extractor.GetNextImage() ' Advance image enumeration
End If

' Open first output image in default associated application
Set shell = CreateObject("WScript.Shell")
shell.Run "image0.png", 1, false
Set shell = Nothing

Set extractor = Nothing

Download Source Code (.zip)

Return to the previous page Explore PDF Extractor SDK