Encrypt128, DocEncrypt128

<Flags()>
Public Enum PERMISSIONS As Integer
    NO_PERMISSION = &HFFFFF0C0
    ENABLE_PRINTING = &H4
    ENABLE_DOCUMENT_MODIFICATION = &H8
    ENABLE_COPYING_TEXT_GRAPHICS = &H10
    ENABLE_ADDING_CHANGING_NOTES = &H20
    ENABLE_ONLY_FILL_IN = &H100
    ENABLE_EXTRACTION = &H200
    ENABLE_ONLY_ASSEMBLY = &H400
    ENABLE_HIGH_QUALITY = &H800
End Enum
 
Public Sub Sample()
    ' Constants for Activation codes
    Const strLicenseTo As String = "Amyuni PDF Converter Evaluation"
    Const strActivationCode As String = "07EFCDAB0100010025AFF1801CB9441306C5739F7D452154D8833B9CECBA2ADE79E3762A69FFC354528A5F4A5811BE3204A0A439F5BA"
 
    ' Declare a new cdintfex document if it does not exist in the form.
    Dim pdfDoc As New CDIntfEx.Document
 
    ' The SetLicenseKey method should be called after creating an object of type 
    ' CDIntfEx.Document to activate the advanced methods that require the object 
    ' activation code to work properly
    pdfDoc.SetLicenseKey(strLicenseTo, strActivationCode)
 
    ' Open the document
    pdfDoc.Open("c:\temp\test.pdf")
 
    ' Set Encryption
    pdfDoc.Encrypt128("owner123", "user123", PERMISSIONS.NO_PERMISSION Or PERMISSIONS.ENABLE_PRINTING Or PERMISSION.ENABLE_HIGH_QUALITY)
 
    ' Save the document
    pdfDoc.Save("c:\temp\Encrypted.pdf")
End Sub

[Flags]
public enum PERMISSIONS
{
    NO_PERMISSION = unchecked((int)0xFFFFF0C0),
    ENABLE_PRINTING = 0x4,
    ENABLE_DOCUMENT_MODIFICATION = 0x8,
    ENABLE_COPYING_TEXT_GRAPHICS = 0x10,
    ENABLE_ADDING_CHANGING_NOTES = 0x20,
    ENABLE_ONLY_FILL_IN = 0x100,
    ENABLE_EXTRACTION = 0x200,
    ENABLE_ONLY_ASSEMBLY = 0x400,
    ENABLE_HIGH_QUALITY = 0x800
}
 
public void Sample()
{
    // Constants for Activation codes
    const string strLicenseTo = "Amyuni PDF Converter Evaluation";
    const string strActivationCode = "07EFCDAB0100010025AFF1801CB9441306C5739F7D452154D8833B9CECBA2ADE79E3762A69FFC354528A5F4A5811BE3204A0A439F5BA";
 
    // Declare a new cdintfex document if it does not exist in the form.
    CDIntfEx.Document pdfDoc = new CDIntfEx.Document();
 
    // The SetLicenseKey method should be called after creating an object of type 
    // CDIntfEx.Document to activate the advanced methods that require the object 
    // activation code to work properly
    pdfDoc.SetLicenseKey(strLicenseTo, strActivationCode);
 
    // Open the document
    pdfDoc.Open(@"c:\temp\test.pdf");
 
    // Set Encryption
    pdfDoc.Encrypt128("owner123", "user123", (int)(PERMISSIONS.NO_PERMISSION | PERMISSIONS.ENABLE_PRINTING | PERMISSIONS.HIGH_QUALITY));
 
    // Save the document
    pdfDoc.Save("c:\temp\Encrypted.pdf");
}

// PDF Converter Cpp.cpp : Defines the entry point for the console application.
// 
#include <Windows.h>
#include <string>
#include <iostream>
#include "CdIntf.h"
#pragma comment (lib, "CDIntf.lib")
 
using namespace std;
 
enum PERMISSIONS 
{
    NO_PERMISSION = 0xFFFFF0C0,
    ENABLE_PRINTING = 0x4,
    ENABLE_DOCUMENT_MODIFICATION = 0x8,
    ENABLE_COPYING_TEXT_GRAPHICS = 0x10,
    ENABLE_ADDING_CHANGING_NOTES = 0x20,
    ENABLE_ONLY_FILL_IN = 0x100,
    ENABLE_EXTRACTION = 0x200,
    ENABLE_ONLY_ASSEMBLY = 0x400,
    ENABLE_HIGH_QUALITY = 0x800
};
 
int main()
{
     // Constants for Activation codes
    #define strLicenseTo  "Amyuni PDF Converter Evaluation"
    #define strActivationCode "07EFCDAB0100010025AFF1801CB9441306C5739F7D452154D8833B9CECBA2ADE79E3762A69FFC354528A5F4A5811BE3204A0A439F5BA"
 
    // Declare a new cdintfex document if it does not exist in the form.
    EXTDOCHANDLE pdfDoc;
 
    // The SetLicenseKey method should be called after creating an object of type 
    // CDIntfEx.Document to activate the advanced methods that require the object 
    // activation code to work properly
    SetLicenseKeyA(strLicenseTo, strActivationCode);
 
    // Open the document
    LPBYTE passWord = nullptr;
    DocOpenA(&pdfDoc, "c:\\temp\\test.pdf", passWord);
 
    // Set Encryption
    DocEncrypt128A(pdfDoc, "owner123", "user123", PERMISSIONS::NO_PERMISSION | PERMISSIONS::ENABLE_PRINTING | PERMISSIONS::ENABLE_HIGH_QUALITY);
 
    // Save the document
    DocSaveA(pdfDoc, "c:\\temp\\Encrypted.pdf");
 
    // Destroy pdfDoc object
    DocClose(pdfDoc);
    pdfDoc = nullptr;    
 
    return 0;
}

package Example;
 
import com.jacob.activeX.ActiveXComponent;
import com.jacob.com.Dispatch;
import com.jacob.com.Variant;
 
public class Sample {
    public enum PERMISSIONS 
    {
        NO_PERMISSION (0xFFFFF0C0),
        ENABLE_PRINTING (0x4),
        ENABLE_DOCUMENT_MODIFICATION (0x8),
        ENABLE_COPYING_TEXT_GRAPHICS (0x10),
        ENABLE_ADDING_CHANGING_NOTES (0x20)
        ENABLE_ONLY_FILL_IN (0x100),
        ENABLE_EXTRACTION (0x200),
        ENABLE_ONLY_ASSEMBLY (0x400),
        ENABLE_HIGH_QUALITY (0x800);
        public int value;
        public PERMISSIONS(int value)
        {
            this.value = value;
        }
        public Object value(){
            return value;
        }
    }
    public static void main(String[] args)
    {
        // Constants for Activation codes
        String strLicenseTo  = "Amyuni PDF Converter Evaluation";
        String strActivationCode = "07EFCDAB0100010025AFF1801CB9441306C5739F7D452154D8833B9CECBA2ADE79E3762A69FFC354528A5F4A5811BE3204A0A439F5BA";
 
        // Declare a new cdintfex document if it does not exist in the form.
        ActiveXComponent pdfDoc = new ActiveXComponent("CDIntfEx.Document.6.5"); 
 
        // The SetLicenseKey method should be called after creating an object of type 
        // CDIntfEx.Document to activate the advanced methods that require the object 
        // activation code to work properly
        Dispatch.call(pdfDoc, "SetLicenseKey", strLicenseTo, strActivationCode);
 
        // Open the document
        Dispatch.call(pdfDoc, "Open", "c:\\temp\\test.pdf");
 
        // Set Encryption
        Dispatch.call(pdfDoc, "Encrypt128", "owner123", "user123", PERMISSIONS.NO_PERMISSION.value + PERMISSIONS.ENABLE_PRINTING.value + PERMISSIONS.ENABLE_HIGH_QUALITY.value);
 
        // Save the document
        Dispatch.call(pdfDoc, "Save", "c:\\temp\\Encrypted.pdf");
 
        // Destroy pdfDoc object
        pdfDoc = null; 
    }
}

$PERMISSIONS = @{
    NO_PERMISSION = 0xFFFFF0C0
    ENABLE_PRINTING = 0x4
    ENABLE_DOCUMENT_MODIFICATION = 0x8
    ENABLE_COPYING_TEXT_GRAPHICS = 0x10
    ENABLE_ADDING_CHANGING_NOTES = 0x20
    ENABLE_ONLY_FILL_IN = 0x100
    ENABLE_EXTRACTION = 0x200
    ENABLE_ONLY_ASSEMBLY = 0x400
    ENABLE_HIGH_QUALITY = 0x800
}
 
# Constants for Activation codes
$strLicenseTo  =  "Amyuni PDF Converter Evaluation"
$strActivationCode = "07EFCDAB0100010025AFF1801CB9441306C5739F7D452154D8833B9CECBA2ADE79E3762A69FFC354528A5F4A5811BE3204A0A439F5BA"
 
#Declare a new cdintfex document if it does not exist in the form.
$pdfDoc = New-Object -ComObject CDIntfEx.Document.6.5
 
#The SetLicenseKey method should be called after creating an object of type 
#CDIntfEx.Document to activate the advanced methods that require the object 
#activation code to work properly
[System.__ComObject].InvokeMember('SetLicenseKey', [System.Reflection.BindingFlags]::InvokeMethod,$null,$pdfDoc, @($strLicenseTo, $strActivationCode))
 
#Open the document
[System.__ComObject].InvokeMember('Open', [System.Reflection.BindingFlags]::InvokeMethod,$null,$pdfDoc,"c:\temp\test.pdf") 
 
#Set Encryption
[System.__ComObject].InvokeMember('Encrypt128', [System.Reflection.BindingFlags]::InvokeMethod,$null,$pdfDoc, 
    @("owner123", "user123", $PERMISSIONS::NO_PERMISSION -bOr $PERMISSIONS::ENABLE_PRINTING -bOr $PERMISSIONS::ENABLE_HIGH_QUALITY))
 
#Save the document
[System.__ComObject].InvokeMember('Save', [System.Reflection.BindingFlags]::InvokeMethod,$null,$pdfDoc,"c:\temp\Encrypted.pdf") 
 
#Destroy pdfDoc object
$pdfDoc = $null

' Permissions
Const NO_PERMISSION = -3904
Const ENABLE_PRINTING = 4
Const ENABLE_DOCUMENT_MODIFICATION = 8
Const ENABLE_COPYING_TEXT_GRAPHICS = 16
Const ENABLE_ADDING_CHANGING_NOTES = 32
Const ENABLE_ONLY_FILL_IN = 256
Const ENABLE_EXTRACTION = 512
Const ENABLE_ONLY_ASSEMBLY = 1024
Const ENABLE_HIGH_QUALITY = 2048
 
' Constants for Activation codes
Const strLicenseTo = "Amyuni PDF Converter Evaluation"
Const strActivationCode = "07EFCDAB0100010025AFF1801CB9441306C5739F7D452154D8833B9CECBA2ADE79E3762A69FFC354528A5F4A5811BE3204A0A439F5BA"
 
' Declare a new Document object
Dim pdfDoc
Set pdfDoc = CreateObject("CDIntfEx.Document.6.5")
 
' The SetLicenseKey method should be called after creating an object of type 
' CDIntfEx.Document to activate the advanced methods that require the object 
' activation code to work properly
pdfDoc.SetLicenseKey strLicenseTo, strActivationCode
 
' Open the document
pdfDoc.Open "c:\temp\test.pdf"
 
' Set Encryption
pdfDoc.Encrypt128 "owner123", "user123", NO_PERMISSION + ENABLE_PRINTING + ENABLE_HIGH_QUALITY
 
' Save the document
pdfDoc.Save "c:\temp\Encrypted.pdf"
 
' Destroy pdfDoc object
Set pdfDoc = Nothing