PDF Stamping
With the Aloaha PDF SDK it is very easy to apply text stamps to existing PDF Documents. Such documents can even be 40 and 128 Bit encrypted. Aloaha will decrypt them (without knowing the owner password), apply the text stamp and re-encrypt the PDF documents. Please find the sample sourcecode below. To be able to run this code you need to install the Aloaha PDF Suite from
http://www.aloaha.com/download/aloaha_pdf.zip
It is also possible to create dynamic, self updating time stamps. Please learn more on:
http://www.aloaha.com/software-development/dynamik-time-stamp.php
Dim pdf
Dim tsLeft
Dim tsTop
Dim tsWidth
Dim tsHeight
Set pdf = CreateObject("aloahapdf.edit")
tsleft = 1
tstop = 400
tswidth = 25
tsheight = 25
If pdf.load_pdf_to_mem("c:\1.pdf") = true Then
If pdf.make_tstamp(cdbl(tsLeft), cdbl(tsTop), cdbl(tsWidth), cdbl(tsHeight), "test123") = true Then
If pdf.save_pdf_to_file("c:\adfasf.pdf") = true Then
MsgBox "OK"
End If
End If
End If
Set pdf = nothing
Aloaha Software / Knowledge Base / PDF SDK / Text Stamps