:: Home :: Products :: Technical Support :: About Us :: Contact Us
PDF Printer Driver, Convert to PDF, Print to PDF
Example 1: Stamp a PDF file with a text watermark (Visual Basic)  

   Dim NVstamp : Set NVstamp = CreateObject("PDFstamp.Neevia")

   Dim indx : indx = NVstamp.CreateNewStamp
   NVstamp.Stamps(indx).StampType = 0
   NVStamp.Stamps(indx).Name = "Stamp1"
   NVStamp.Stamps(indx).Text = "WATERMARK"
   NVStamp.Stamps(indx).FontName = "Arial"
   NVStamp.Stamps(indx).TextRenderingMode = 0
   NVStamp.Stamps(indx).TextColor = "#FF0000"
   NVStamp.Stamps(indx).X = "center"
   NVStamp.Stamps(indx).Y = "center"
   NVStamp.Stamps(indx).PlaceAs = 0

   Dim retVal
   retVal = NVStamp.StampPDF("c:\in.pdf", "c:\out.pdf")

   If retVal <> 0 Then
     MsgBox("Error code=" & CStr(retVal))
   Else
     MsgBox("Done")
   End If


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

Alex Wetzel

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