An easy to understand sample source code to learn how to optimize pdf with pdf extractor sdk in VB.NET ByteScout Premium Suite can optimize pdf with pdf extractor sdk. It can be applied from VB.NET. ByteScout Premium Suite is the set that includes 12 SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.
This prolific sample source code in VB.NET for ByteScout Premium Suite contains various functions and other necessary options you should do calling the API to optimize pdf with pdf extractor sdk. IF you want to implement the functionality, just copy and paste this code for VB.NET below into your code editor with your app, compile and run your application. If you want to use these VB.NET sample examples in one or many applications then they can be used easily.
The trial version of ByteScout Premium Suite can be downloaded for free from our website. It also includes source code samples for VB.NET and other programming languages.
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