# Code Samples - Neevia PDFcompress

## Example 1: Compress a PDF file (high image quality, low compression) - ASP Copy

After you install Neevia PDF compress on your Windows machine use the ASP code below. What it does is compress each page in 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 21 22 23  <% Dim NVcomp : Set NVcomp = Server.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 Response.Write "Error = " & CStr(retVal) else Response.Write "Done" end if %>