Example 4: Resize and linearize a PDF file (Visual Basic)  Dim NVresize : Set NVresize = CreateObject("PDFresize.Neevia") NVresize.PageWidth = 5 ' page width = 5 inches NVresize.PageHeight = 10 ' page height = 10 inches NVresize.Units = 1 ' measurement units = inches NVresize.Scale = true ' scale page NVresize.ConstrainProportions = true ' constrain proportions when scaling NVresize.Center = true ' center page content NVresize.Linearize = true ' linearize output file Dim retVal : retVal = NVresize.ResizePDF("c:\in.pdf", "c:\out.pdf") If retVal <> 0 Then MsgBox("Error code=" & CStr(retVal)) Else MsgBox("Done") End If 

 Testimonials
 I downloaded PDFcompress and must say that I was impressed by the high compression ratio, speed and easy to use graphic interface.
 Alex Wetzel

 Site feedback
 If you have any comments or suggestions about our web site, please feel free to email them to web®neeviaPDF¸com