Override Resolution in Rendered Image - VBScript and VB6
PDF Renderer SDK sample in VBScript and VB6 demonstrating ‘Override Resolution in Rendered Image’
OverrideResolutionInRenderedImage.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"
' Set resolution of rendered images to 300DPI
Set renderingOptions = CreateObject("Bytescout.PDFRenderer.RenderingOptions")
renderingOptions.ResolutionOverride= 300
' Iterate through pages
For i = 0 To renderer.GetPageCount()-1
' Generate 800x600 px PNG image
renderer.Save_4 "image" & i & ".png", 2, i, 600, 800, (renderingOptions)
Next