This page helps you to learn from code samples for programming in VBScript. ByteScout PDF Suite was made to help with pdf to image in command line with pdf renderer sdk in VBScript. 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.
Save time on writing and testing code by using the code below and use it in your application. If you want to implement this functionality, you should copy and paste code below into your app using code editor. Then compile and run your application. These VBScript sample examples can be used in one or many applications.
Trial version along with the source code samples for VBScript can be downloaded from our website
On-demand (REST Web API) version:
Web API (on-demand version)
On-premise offline SDK for Windows:
60 Day Free Trial (on-premise)
@echo off REM Run VBScript through the command line REM The script convert first pages of all PDF documents in the outer folder containing sample files (..\..) REM and puts generated images to "output" sub-folder. cscript.exe "PDF_to_Image.vbs" ..\.. output pause
60 Day Free Trial or Visit ByteScout PDF Suite Home Page
Explore ByteScout PDF Suite Documentation
Explore Samples
Sign Up for ByteScout PDF Suite Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
if WScript.Arguments.Length < 2 Then WScript.Echo "Usage: cscript PDF_to_Image.vbs <input_folder> <output_folder>" WScript.Quit End If ' Create Bytescout.PDFRenderer.RasterRenderer object Set renderer = CreateObject("Bytescout.PDFRenderer.RasterRenderer") renderer.RegistrationName = "demo" renderer.RegistrationKey = "demo" ' 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 = 2 Dim pageIndex pageIndex = 0 ' Create File System object Set FSO = CreateObject("Scripting.FileSystemObject") ' Get folder object (current folder) Set inputFolder = FSO.GetFolder(WScript.Arguments.Item(0)) ' Get file list Set files = inputFolder.Files ' Prepare output folder outputFolder = WScript.Arguments.Item(1) If FSO.FolderExists(outputFolder) Then FSO.DeleteFolder outputFolder, True End If FSO.CreateFolder outputFolder ' Run barcode search for PDF and TIFF files For Each file in files ext = UCase(FSO.GetExtensionName(file)) If ext = "PDF" Then WScript.Echo "Processing file " & FSO.GetFileName(file) renderer.LoadDocumentFromFile file fileName = FSO.BuildPath(WScript.Arguments.Item(1), FSO.GetFileName(file) & ".page0.png") renderer.Save fileName, outputImageFormat, pageIndex, renderingResolution WScript.Echo " first page converted to " & fileName End If Next WScript.Echo "Done." Set renderer = Nothing Set FSO = Nothing
60 Day Free Trial or Visit ByteScout PDF Suite Home Page
Explore ByteScout PDF Suite Documentation
Explore Samples
Sign Up for ByteScout PDF Suite Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
60 Day Free Trial or Visit ByteScout PDF Suite Home Page
Explore ByteScout PDF Suite Documentation
Explore Samples
Sign Up for ByteScout PDF Suite Online Training
Get Your API Key
Explore Web API Docs
Explore Web API Samples
also available as: