C#/VB.NET: PDF 문서 압축

PM> Install-Package Spire.PDF

using Spire.Pdf;
    using Spire.Pdf.Conversion.Compression;
    
    namespace CompressPdf
    {
        class Program
        {
            static void Main(string[] args)
            {
                //Load a PDF document while initializing the PdfCompressor object
                PdfCompressor compressor = new PdfCompressor("C:\\Users\\Administrator\\Desktop\\ToCompress.pdf");
    
                //Get text compression options
                TextCompressionOptions textCompression = compressor.Options.TextCompressionOptions;
    
                //Compress fonts
                textCompression.CompressFonts = true;
    
                //Unembed fonts
                //textCompression.UnembedFonts = true;
    
                //Get image compression options
                ImageCompressionOptions imageCompression = compressor.Options.ImageCompressionOptions;
    
                //Set the compressed image quality
                imageCompression.ImageQuality = ImageQuality.High;
    
                //Resize images
                imageCompression.ResizeImages = true;
    
                //Compress images
                imageCompression.CompressImage = true;
    
                //Save the compressed document to file
                compressor.CompressToFile("Compressed.pdf");
            }
        }
    }
    

Imports Spire.Pdf
    Imports Spire.Pdf.Conversion.Compression
    
    Namespace CompressPdf
        Class Program
            Shared  Sub Main(ByVal args() As String)
                'Load a PDF document while initializing the PdfCompressor object
                Dim compressor As PdfCompressor =  New PdfCompressor("C:\\Users\\Administrator\\Desktop\\ToCompress.pdf")
    
                'Get text compression options
                Dim textCompression As TextCompressionOptions =  compressor.Options.TextCompressionOptions
    
                'Compress fonts
                textCompression.CompressFonts = True
    
                'Unembed fonts
                textCompression.UnembedFonts = True
    
                'Get image compression options
                Dim imageCompression As ImageCompressionOptions =  compressor.Options.ImageCompressionOptions
    
                'Set the compressed image quality
                imageCompression.ImageQuality = ImageQuality.High
    
                'Resize images
                imageCompression.ResizeImages = True
    
                'Compress images
                imageCompression.CompressImage = True
    
                'Save the compressed document to file
                compressor.CompressToFile("Compressed.pdf")
            End Sub
        End Class
    End Namespace