ByteScout PDF Renderer SDK – VBScript and VB6 – Convert PDF To JPEG

Home
/
Articles
/
ByteScout PDF Renderer SDK – VBScript and VB6 – Convert PDF To JPEG

printable version:
ByteScout-PDF-Renderer-SDK-VBScript-and-VB6-Convert-PDF-To-JPEG.pdf

How to convert PDF to JPEG in VBScript and VB6 and ByteScout PDF Renderer SDK

Tutorial on how to convert PDF to JPEG in VBScript and VB6

Learn how to convert PDF to JPEG in VBScript and VB6 with this source code sample. ByteScout PDF Renderer SDK: the SDK for rendering of PDF into high-quality thumbnails and images. Includes various functions like batch processing, PNG, TIFF output. Can be used from web and desktop applications. It can convert PDF to JPEG in VBScript and VB6.

The SDK samples like this one below explain how to quickly make your application do convert PDF to JPEG in VBScript and VB6 with the help of ByteScout PDF Renderer SDK. In order to implement the functionality, you should copy and paste this code for VBScript and VB6 below into your code editor with your app, compile and run your application. Test VBScript and VB6 sample code examples whether they respond your needs and requirements for the project.

Trial version of ByteScout PDF Renderer SDK can be downloaded for free from our website. It also includes source code samples for VBScript and VB6 and other programming languages.

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

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

PDFToJPEG.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 96 DPI - default PC display resolution
' To get higher quality output, set 200, 300 or more
Dim renderingResolution
renderingResolution = 96

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

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