:: Home :: Products :: Technical Support :: About Us :: Contact Us
PDF Printer Driver, Convert to PDF, Print to PDF
Example 3: Resize a specified page in 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.Pages = "1" 'resize the first page of the PDF
 
   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


I needed to build an entreprise level solution to stamp large batches of PDF files. With PDFstamp I could do it in a short time and for a fraction of the price your competitors charge.

Claude Lefevre

If you have any comments or suggestions about our web site, please feel free to email them to

Copyright © 2017 neeviaPDF.com Home | Products | Support | About Us | Contact Us