 |
| Example 4: Encrypt a PDF file (Visual Basic) |
|
|
Dim NVsign : Set NVsign = CreateObject("Neevia.PDFsign")
NVsign.PDFEncrypt = true
NVsign.PDFEncryptionType = "rc4"
NVsign.PDFOwnerPassword = "owner"
' p - document printing is denied
' e - disable extraction of text and graphics
NVsign.PDFPermissions = "pe"
Dim retVal : retVal = NVsign.EncryptPDF("c:\in.pdf", "c:\out.pdf")
If retVal <> 0 Then
MsgBox("Error code=" & CStr(retVal))
Else
MsgBox("Done")
End If
|
|
|
|
I was looking for a product that could place watermarks on very large PDF files (some of them over 30 thousand pages) in as less time as possible. After testing many tools I found Neevia PDFstamp. It did the job!
