space1 separator space2  

Code Samples - Neevia PDFcompress

Example 1: Compress a PDF file (high image quality, low compression) - VB.NET Copy 

Make sure Neevia PDF compress is installed on your Windows machine then use the Visual Basic.NET code below. What it does is compress each page the input PDF document and at the same time preserve the image quality.
 1
 2
 3
 4
 5
 6
 7
 8
 9
10
11
12
13
14
15
16
17
18
19
20
   Dim NVcomp : NVcomp = CreateObject("PDFcompress.Neevia")

   NVcomp.CI = "jpx"
   NVcomp.CQ = 75

   NVcomp.GI = "jpx"
   NVcomp.GQ = 75

   NVcomp.MI = "jbig2l"
   NVcomp.MQ = 5

   'For better compression uncomment the line below
   ' NVcomp.CreateObjectStreams = true

   Dim retVal : retVal = NVcomp.CompressPDF("c:\in.pdf","c:\out.pdf")
   If retVal <> 0 Then
      MsgBox("Error code=" & CStr(retVal))
   Else
      MsgBox("Done")
   End If