 |
| Example 4: Stamp a PDF file with a PDF overlay (Visual Basic) |
|
|
Dim NVstamp : Set NVstamp = CreateObject("PDFstamp.Neevia")
Dim indx : indx = NVstamp.CreateNewStamp
NVstamp.Stamps(indx).StampType = 3
NVstamp.Stamps(indx).Name = "Stamp1"
NVstamp.Stamps(indx).PDFOverlayFile = "c:\overlay.pdf"
NVstamp.Stamps(indx).X = "center"
NVstamp.Stamps(indx).Y = "center"
NVstamp.Stamps(indx).PlaceAs = 1
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 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.
