Signature Validation API

Owner of an Enterprise license are able to use Aloaha easy to use Signature Validation API. For easy scriping the API is implemented as automation compatible COM API.

Code Sample:

On error resume next
dim pdf
dim Document
Dim CertChain
dim i
Dim Dummy

'definie filepath to document to be validated
Document = cstr("c:\blabla.signed.pdf")

'create Aloaha COM Object
set pdf = createobject("aloahacerthandler.lib")
if pdf.info>0 then

   'load document into memory
   call pdf.LoadPDFDocument(cstr(Document))

   'check for locally cached offline revokation
   if pdf.revoked(0)= true then
      msgbox "Found in Offline Revokation List"
   end if

   'check online revokation list
   if pdf.revoked(1)= true then
      msgbox "Found in Online Revokation List"
   end if

   'do OSCP checks
   if pdf.revoked(2)= true then
      msgbox "Found in OSCP"
   end if

   'display CAPICOM compatible result Bitmask
   msgbox "Chainresult: "+cstr(pdf.LastCapiResults)

   'read certificate chain of first signature into variable
   'CertChain is CapiCom.Certificates Object
   set CertChain = pdf.DocumentCertChain(1)

   'write some certificate properties into string varible
   if CertChain.count>0 then
      if err.number=0 then
         for i = 1 to certchain.count

            'property names are capicom compatible
            Dummy = dummy+certchain(i).subjectname+vbcrlf
            Dummy = dummy+certchain(i).SerialNumber+vbcrlf
            dummy=dummy+"===="+vbcrlf+vbcrlf

        next
        msgbox dummy
      end if
   end if

end if
set pdf = nothing