Aloaha supports a variety of different PDF Signature Types. It supports embedded PKCS #1, PKCS #7 as normal and incremental signatures. Furthermore signatures can be text, transparent, invisible and JPG 24 Bit!
Below you find a sample VB example for text, transparent, invisible and image signatures.
Evaluation Key required!
Private Sub Command1_Click()
Dim image As String
Dim invisible As Boolean
Dim i As Long
Command1.Enabled = False
For i = 1 To 4
If i = 1 Then
image = “”
invisible = False
End If
If i = 2 Then
image = “”
invisible = True
End If
If i = 3 Then
image = “Digitalno podpisal @@signature@@@@lf@@dne @@date@@@@lf@@.”
invisible = False
End If
If i = 4 Then
image = “c:\siav.jpg”
invisible = False
End If
Call AloahaDigSign(“c:\untitled.pdf”, “c:\output” + CStr(i) + “.pdf”, invisible, image)
Next i
Command1.Enabled = True
End Sub
Private Sub AloahaDigSign(ByVal inFileName As String, ByVal outFilename As String, ByVal invisible As Boolean, ByVal pathImage As String)
Dim pdfEdit As Object
Dim CertSerNum As String
‘Unique Container Name or Serial Number of Certificate to be used.
‘Please make sure the right store is choosen in signature settings dialog
‘This sample uses native Reader 0 (first available card reader)
CertSerNum = “0”
Set pdfEdit = CreateObject(“aloahapdf.edit”)
If pathImage = “” Then
If invisible = True Then
pdfEdit.signaturecontent = “”
Else
‘works only if in settings incremental signatures have been disabled
‘HKCU\Software\Aloaha\pdf\ForceIncrementalSignature = 0
pdfEdit.signaturecontent = ” ”
End If
Else
If Mid(pathImage, 2, 1) <> “:” Then
‘works only if in settings incremental signatures have been disabled
‘HKCU\Software\Aloaha\pdf\ForceIncrementalSignature = 0
pdfEdit.signaturecontent = pathImage
Else
pdfEdit.signaturecontent = “”
End If
End If
Call pdfEdit.sign_pdf_file(inFileName, outFilename, 0, 0, 11, 8, 21, 2, “Overjam digitalno verzijo”, “Koper”, CertSerNum, pathImage)
Set pdfEdit = Nothing
End Sub