vb.netを使用してPDFファイルにパスワードを追加

Question

私はちょうど私が既存のPDFファイルにパスワードを追加することができますか質問したい、私はちょうど水晶レポートを使用してPDFファイルを作成し、報告する。事前にどうもありがとうございました。

「c：\ Folder1 \ sample.pdf」というファイルがすでに存在するとします。単語「PdfReader」をしている私には、以下のようなコードを見てきましたが、私はそれが

    ' Define input and output files path. 
        Dim intputFilePath As String = Program.RootPath + "\\" + "1.pdf" 
        Dim outputFilePath As String = Program.RootPath + "\\" + "1_with_pw.pdf" 
        ' Set passwords for user and owner. 
        Dim userPassword As String = "you" 
        Dim ownerPassword As String = "me" 
        ' Create password setting. 
        Dim setting As PasswordSetting = New PasswordSetting(userPassword, ownerPassword) 

        ' Add password to plain PDF file and output a new file. 
        Dim errorCode As Integer = PDFDocument.AddPassword(intputFilePath, outputFilePath, setting) 
        If errorCode = 0 Then 
         Console.WriteLine("Success") 
        Else 
         Console.WriteLine("Failed") 
        End If 

Answer 1

    Dim WorkingFolder As String = Environment.GetFolderPath(Environment.SpecialFolder.Desktop) 
        Dim InputFile As String = Path.Combine(WorkingFolder, "PSNOs.pdf") 
        Dim OutputFile As String = Path.Combine(WorkingFolder, "PSNOs_enc.pdf") 
        Using input As Stream = New FileStream(InputFile, FileMode.Open, FileAccess.Read, FileShare.Read) 
         Using output As Stream = New FileStream(OutputFile, FileMode.Create, FileAccess.Write, FileShare.None) 
          Dim reader As New PdfReader(input) 
          PdfEncryptor.Encrypt(reader, output, True, Nothing, "secret", PdfWriter.ALLOW_SCREENREADERS) 
         End Using 
        End Using 

を動作させるために私の参照を追加するかわからないので、それが動作するかどうか私は知りませんエラーメッセージが表示されますが、何かをインポートするように求めません。