Link Search Menu Expand Document

Optimize PDF - VB.NET

PDF Extractor SDK sample in VB.NET demonstrating ‘Optimize PDF’

Program.vb
Imports Bytescout.PDFExtractor

Module Program

    Sub Main()

        Try

            Using docOptimizer As New DocumentOptimizer("demo", "demo")

                'Set Optimization Options
                Dim OptimizationOptions = New OptimizationOptions

                'This will resize high resolution images
                OptimizationOptions.ResampleImages = True

                ''Set image optimization format
                'OptimizationOptions.ImageOptimizationFormat = ImageOptimizationFormat.JPEG

                ''Control Optimized image quality, for further fine grained control
                'OptimizationOptions.JPEGQuality = 10

                'Perform Optimization
                docOptimizer.OptimizeDocument("sample.pdf", "sample_optimized.pdf", OptimizationOptions)

                ''Get Optimized file info
                Dim fileInfo_Sample = New System.IO.FileInfo("sample.pdf")
                Dim fileInfo_SampleOptimized = New System.IO.FileInfo("sample_optimized.pdf")

                'Write Stats
                Console.WriteLine("Source File Size: " + fileInfo_Sample.Length.ToString() + " bytes")
                Console.WriteLine("Source File Optimized to Size: " + fileInfo_SampleOptimized.Length.ToString() + " bytes")

            End Using

        Catch ex As Exception
            Console.WriteLine(ex.Message)
        End Try

        Console.WriteLine("Press any key to exit...")
        Console.ReadLine()

    End Sub

End Module

Download Source Code (.zip)

Return to the previous page Explore PDF Extractor SDK