The sample source code below will teach you how to set passwords and permissions for pdf with pdf sdk in VB.NET. ByteScout Premium Suite can set passwords and permissions for pdf with pdf sdk. It can be applied from VB.NET. ByteScout Premium Suite is the bundle that includes twelve SDK products from ByteScout including tools and components for PDF, barcodes, spreadsheets, screen video recording.
Want to save time? You will save a lot of time on writing and testing code as you may just take the VB.NET code from ByteScout Premium Suite for set passwords and permissions for pdf with pdf sdk below and use it in your application. Just copy and paste the code into your VB.NET application’s code and follow the instructions. Enjoy writing a code with ready-to-use sample codes in VB.NET.
Our website gives trial version of ByteScout Premium Suite for free. It also includes documentation and source code samples.
Imports Bytescout.PDF ''' <summary> ''' This example demonstrates how to lock the document with a password. ''' PDF format supports two kinds of passwords: owner and user password. ''' User password allows to view document and perform allowed actions. ''' Owner password allows everything, including changing passwords and permissions. ''' </summary> Class Program Shared Sub Main() ' Create new document Dim pdfDocument = New Document() pdfDocument.RegistrationName = "demo" pdfDocument.RegistrationKey = "demo" ' Add page pdfDocument.Pages.Add(New Page(PaperFormat.A4)) ' Set document encryption algorythm pdfDocument.Security.EncryptionAlgorithm = EncryptionAlgorithm.RC4_40bit ' Set various user permissions pdfDocument.Security.AllowPrintDocument = False pdfDocument.Security.AllowContentExtraction = False pdfDocument.Security.AllowModifyAnnotations = False pdfDocument.Security.PrintQuality = PrintQuality.LowResolution ' Set owner password pdfDocument.Security.OwnerPassword = "ownerpassword" ' Set user password pdfDocument.Security.UserPassword = "userpassword" ' Save document to file pdfDocument.Save("result.pdf") ' Cleanup pdfDocument.Dispose() ' Open document in default PDF viewer app Process.Start("result.pdf") End Sub End Class