ByteScout PDF Suite – VBScript – Convert pdf to high quality png with pdf renderer sdk

Home
/
Articles
/
ByteScout PDF Suite – VBScript – Convert pdf to high quality png with pdf renderer sdk

printable version:
ByteScout-PDF-Suite-VBScript-Convert-pdf-to-high-quality-png-with-pdf-renderer-sdk.pdf

How to convert pdf to high quality png with pdf renderer sdk in VBScript and ByteScout PDF Suite

If you want to learn more then this tutorial will show how to convert pdf to high quality png with pdf renderer sdk in VBScript

Quickly learn how to convert pdf to high quality png with pdf renderer sdk in VBScript with this sample source code. Want to convert pdf to high quality png with pdf renderer sdk in your VBScript app? ByteScout PDF Suite is designed for it. ByteScout PDF Suite is the set that includes 6 SDK products to work with PDF from generating rich PDF reports to extracting data from PDF documents and converting them to HTML. This bundle includes PDF (Generator) SDK, PDF Renderer SDK, PDF Extractor SDK, PDF to HTML SDK, PDF Viewer SDK and PDF Generator SDK for Javascript.

This prolific sample source code in VBScript for ByteScout PDF Suite contains various functions and other necessary options you should do calling the API to convert pdf to high quality png with pdf renderer sdk. Follow the instructions from scratch to work and copy the VBScript code. If you want to use these VBScript sample examples in one or many applications then they can be used easily.

You can download free trial version of ByteScout PDF Suite from our website to see and try many others source code samples for VBScript.

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

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

PDFToPNG.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"

' Render PDF document at 600 DPI for higher quality
Dim renderingResolution
renderingResolution = 600

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

' Iterate through pages
For pageIndex = 0 To renderer.GetPageCount() - 1
	' Render document page to PNG image file
	renderer.Save "page" & CStr(pageIndex) & ".png", outputImageFormat, pageIndex, renderingResolution
Next