Program.vb
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 | Imports Bytescout.PDFRenderer Class Program Friend Shared Sub Main(args As String ()) ' Create an instance of Bytescout.PDFRenderer.RasterRenderer object and register it. Dim renderer As New RasterRenderer() renderer.RegistrationName = "demo" renderer.RegistrationKey = "demo" ' Load PDF document. renderer.LoadDocumentFromFile( "multipage.pdf" ) For i As Integer = 0 To renderer.GetPageCount() - 1 ' Render first page of the document to BMP image file. renderer.Save( "image" & i & ".bmp" , RasterImageFormat.BMP, 0, 300) Next ' Cleanup renderer.Dispose() ' Open the first output file in default image viewer. System.Diagnostics.Process.Start( "image0.bmp" ) End Sub End Class |
Click here to get your Free Trial version of the SDK
also available as: