ByteScout Premium Suite – VBScript – Convert pdf to image with pdf renderer sdk

Home
/
Articles
/
ByteScout Premium Suite – VBScript – Convert pdf to image with pdf renderer sdk

printable version:
ByteScout-Premium-Suite-VBScript-Convert-pdf-to-image-with-pdf-renderer-sdk.pdf

How to convert pdf to image with pdf renderer sdk in VBScript with ByteScout Premium Suite

Step-by-step tutorial on how to convert pdf to image with pdf renderer sdk in VBScript

The sample source codes on this page shows how to convert pdf to image with pdf renderer sdk in VBScript. Want to convert pdf to image with pdf renderer sdk in your VBScript app? ByteScout Premium Suite is designed for it. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.

These VBScript code samples for VBScript guide developers to speed up coding of the application when using ByteScout Premium Suite. 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! Complete and detailed tutorials and documentation are available along with installed ByteScout Premium Suite if you’d like to learn more about the topic and the details of the API.

Trial version of ByteScout Premium Suite is available for free. Source code samples are included to help you with your VBScript app.

On-demand (REST Web API) version:
Web API (on-demand version)

On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)

PDFToImage.vbs

      ' Create Bytescout.PDFRenderer.RasterRenderer  object
Set renderer = CreateObject("Bytescout.PDFRenderer.RasterRenderer")

renderer.RegistrationName = "demo"
renderer.RegistrationKey = "demo"

' Load sample PDF document
renderer.LoadDocumentFromFile "../../multipage.pdf"

' Image format: 0 - BMP; 1 - JPEG; 2 - PNG; 3 - TIFF; 4 - GIF
Dim outputImageFormat
outputImageFormat = 1

' Output extension
Dim outputExtension
Select Case outputImageFormat
Case 0
outputExtension =".bmp"
Case 1
outputExtension =".jpg"
Case 2
outputExtension =".png"
Case 3
outputExtension =".tiff"
Case Else
outputExtension =".gif"
End Select

' Specify Image output's Width and Height
Dim Width
Dim Height

Width = 600
Height = 800

' Iterate through pages
For pageIndex = 0 To renderer.GetPageCount() - 1
	' Render document page to image file
	renderer.Save_3 "page" & CStr(pageIndex) & outputExtension, outputImageFormat, pageIndex, Width, Height
Next