Sub Sample()
' Constants for Activation codes
Const strLicenseTo As String = "Amyuni PDF Creator Evaluation"
Const strActivationCode As String = "07EFCDAB010001004282943F2AF19A88F332D9E781E40460727DF8A42847A1BDE06DB61C71E94E2D90424BF8762385335F9D6884E9FC"
' Initializing PDFCreativeX Object
Dim pdf As ACPDFCREACTIVEX.PDFCreactiveX = New ACPDFCREACTIVEX.PDFCreactiveX()
' Set license key
pdf.SetLicenseKey(strLicenseTo, strActivationCode)
' Set CurrentPage
pdf.CurrentPage = 1
' Create a Barcode in the current Page
pdf.CreateObject(ACPDFCREACTIVEX.ObjectTypeConstants.acObjectTypeBarcode, "Barcode1")
' Define Object
Dim oBarCode As ACPDFCREACTIVEX.IacObject = pdf.GetObjectByName("Barcode1")
' General Attributes
oBarCode("Left") = 100
oBarCode("Right") = 3100
oBarCode("Top") = 1000
oBarCode("Bottom") = 2100
' BarCode Attributes
oBarCode("BarcodeType") = 1 ' PDF417 barcodes are the only type supported
oBarCode("VerticalScale") = 3.0 ' Amount by which To scale the barcode vertically, Default
oBarCode("Text") = "Copyright 2015 Amyuni Technologies"
' Save PDF
pdf.Save("c:\temp\CreatePDFDocument_resulting.pdf", ACPDFCREACTIVEX.FileSaveOptionConstants.acFileSaveView)
End Sub
static void Sample()
{
// Constants for Activation codes
const string strLicenseTo = "Amyuni PDF Creator Evaluation";
const string strActivationCode = "07EFCDAB010001004282943F2AF19A88F332D9E781E40460727DF8A42847A1BDE06DB61C71E94E2D90424BF8762385335F9D6884E9FC";
// Initializing PDFCreativeX Object
ACPDFCREACTIVEX.PDFCreactiveX pdf = new ACPDFCREACTIVEX.PDFCreactiveX();
// Set license key
pdf.SetLicenseKey(strLicenseTo, strActivationCode);
// Set CurrentPage
pdf.CurrentPage = 1;
// Create a Barcode in the current Page
pdf.CreateObject(ACPDFCREACTIVEX.ObjectTypeConstants.acObjectTypeBarcode, "Barcode1");
// Define Object
ACPDFCREACTIVEX.IacObject oBarCode = pdf.GetObjectByName("Barcode1".ToString());
// General Attributes
oBarCode["Left"] = 100;
oBarCode["Right"] = 3100;
oBarCode["Top"] = 1000;
oBarCode["Bottom"] = 2100;
// BarCode Attributes
oBarCode["BarcodeType"] = 1; // PDF417 barcodes are the only type supported
oBarCode["VerticalScale"] = 3.0; // Amount by which to scale the barcode vertically, default
oBarCode["Text"] = "Copyright 2015 Amyuni Technologies";
// Save PDF
pdf.Save(@"c:\temp\CreatePDFDocument_resulting.pdf", ACPDFCREACTIVEX.FileSaveOptionConstants.acFileSaveView);
}
#import "c:\users\amyuni\pdfcreactivex.dll" no_namespace
using namespace std;
int main()
{
// Constants for Activation codes
bstr_t strLicenseTo = "Amyuni PDF Creator Evaluation";
bstr_t strActivationCode = "07EFCDAB010001004282943F2AF19A88F332D9E781E40460727DF8A42847A1BDE06DB61C71E94E2D90424BF8762385335F9D6884E9FC";
// Initialize the COM subsystem
CoInitialize(0);
// IPDFCreactiveXPtr is a smart pointer type defined in pdfcreactivex.tlh,
// the type library header file generated by the #import instruction above
IPDFCreactiveXPtr pdf;
// Create the PDFCreactiveX instance
pdf.CreateInstance(__uuidof(PDFCreactiveX));
// set license key
pdf->SetLicenseKey(_bstr_t(strLicenseTo), _bstr_t(strActivationCode));
// Set CurrentPage
pdf->CurrentPage = 1;
// Set-up variables for attributes
_variant_t varAttribute;
varAttribute.vt = VT_I4; // integers
// Create a Barcode in the current Page
pdf->CreateObject(acObjectTypeBarcode, "Barcode1");
// Define Object
IacObjectPtr oBarcode = pdf->GetObjectByName("Barcode1");
// General Attributes
oBarcode->Attribute["Left"] = 100;
oBarcode->Attribute["Right"] = 3100;
oBarcode->Attribute["Top"] = 1000;
oBarcode->Attribute["Bottom"] = 2100;
// BarCode Attributes
varAttribute.lVal = 1;
oBarcode->Attribute["BarcodeType"] = varAttribute; // PDF417 barcodes are the only type supported
oBarcode->Attribute["VerticalScale"] = 3.0; // Amount by which to scale the barcode vertically, default
oBarcode->Attribute["Text"] = "Copyright 2015 Amyuni Technologies";
// Save PDF
pdf->Save("c:\\temp\\CreatePDFDocument_resulting.pdf", acFileSaveView);
// destroy objects
pdf = NULL;
oBarcode = NULL;
return 0;
}
' ObjectTypeConstants
Const acObjectTypeArrow = 36
Const acObjectTypeBarcode = 45
Const acObjectTypeCell = 33
Const acObjectTypeCheckBox = 21
Const acObjectTypeEllipse = 4
Const acObjectTypeExcel = 17
Const acObjectTypeField = 6
Const acObjectTypeGraph = 19
Const acObjectTypeHighlight = 23
Const acObjectTypeLine = 1
Const acObjectTypePicture = 7
Const acObjectTypePolygon = 8
Const acObjectTypeRoundFrame = 3
Const acObjectTypeRow = 32
Const acObjectTypeSelection = 24
Const acObjectTypeSignature = 39
Const acObjectTypeStickyNote = 22
Const acObjectTypeTable = 16
Const acObjectTypeText = 5
' FileSaveOptionConstants
Const acFileSaveAll = 0
Const acFileSaveDefault = -1
Const acFileSaveView = 1
Const acFileSaveDesign = 2
Const acFileSavePDFA_7 = 3
Const acFileSavePDFA = 4
Const acFileSavePDF14 = 5
' Constants for Activation codes
Const strLicenseTo = "Amyuni PDF Creator Evaluation"
Const strActivationCode = "07EFCDAB010001004282943F2AF19A88F332D9E781E40460727DF8A42847A1BDE06DB61C71E94E2D90424BF8762385335F9D6884E9FC"
' Initializing PDFCreativeX Object
Dim pdf
Set pdf = CreateObject("PDFCreactiveX.PDFCreactiveX.6.5")
' Set license key
pdf.SetLicenseKey strLicenseTo, strActivationCode
' Set CurrentPage
pdf.CurrentPage = 1
' Create a BarCode in the current Page
pdf.CreateObject acObjectTypeBarcode, "Barcode1"
' Define Object
Dim oBarCode
Set oBarCode = pdf.GetObjectByName("Barcode1")
' General Attributes
oBarCode("Left") = 100
oBarCode("Right") = 3100
oBarCode("Top") = 1000
oBarCode("Bottom") = 2100
' BarCode Attributes
oBarCode("BarcodeType") = 1 ' PDF417 barcodes are the only type supported
oBarCode("VerticalScale") = 3.0 ' Amount by which To scale the barcode vertically, Default
oBarCode("Text") = "Copyright 2015 Amyuni Technologies"
' Save PDF
pdf.Save "c:\temp\CreatePDFDocument_resulting.pdf", acFileSaveView
' destroy Objects
Set pdf = Nothing
Set oBarCode = Nothing
