How to read digital certificate from pdf document in vb.net


 

        dim theform acrobat.cacropddoc
        dim jso object

        theform = createobject("acroexch.pddoc")
        theform.open("c:\temp\maru\declaracionjurada.pdf")
        jso = theform.getjsobject

        'verifica que la firma sea valida

        dim signatureone = jso.getfield("signature2")
        dim ostate = signatureone.signaturevalidate()

        select case ostate
            case = -1
                listbox1.items.add("estado : sin firma ")
            case = 0
                listbox1.items.add("estado : firma en blanco ")
            case = 1
                listbox1.items.add("estado : no conoce el estado de la firma ")
            case = 2
                listbox1.items.add("estado : firma invalida ")
            case = 3
                listbox1.items.add("estado : la firma es valida, pero la identidad del firmante no se pudo verificar ")
            case = 4
                listbox1.items.add("estado : firma e identidad son validas ")

        end select

        'extrae la info del firmante, nombre y fecha de la firma
        dim signatureinformation = signatureone.signatureinfo

        listbox1.items.add("firmante " & signatureinformation.name)
        listbox1.items.add("fecha " & signatureinformation.date)

        'extrae la info del certificado
        dim signaturecertificate = signatureinformation.certificates
        listbox1.items.add("emitido : " & signaturecertificate(0).subjectdn.serialnumber)
        listbox1.items.add("numero de serie : " & signaturecertificate(0).serialnumber)
        listbox1.items.add("valido desde : " & signaturecertificate(0).validitystart)
        listbox1.items.add("valido hasta : " & signaturecertificate(0).validityend)
        listbox1.items.add("para : " & signaturecertificate(0).subjectdn.o)
        listbox1.items.add("tipo : " & signaturecertificate(0).subjectdn.ou)
        listbox1.items.add("emitido por : " & signaturecertificate(0).issuerdn.cn)

 

 

 

 

 

 

 

dim theform acrobat.cacropddoc
        dim jso object

        theform = createobject("acroexch.pddoc")
        theform.open("c:\temp\maru\declaracionjurada.pdf")
        jso = theform.getjsobject

        'verifica que la firma sea valida

        dim signatureone = jso.getfield("signature2")
        dim ostate = signatureone.signaturevalidate()

        select case ostate
            case = -1
                listbox1.items.add("estado : sin firma ")
            case = 0
                listbox1.items.add("estado : firma en blanco ")
            case = 1
                listbox1.items.add("estado : no conoce el estado de la firma ")
            case = 2
                listbox1.items.add("estado : firma invalida ")
            case = 3
                listbox1.items.add("estado : la firma es valida, pero la identidad del firmante no se pudo verificar ")
            case = 4
                listbox1.items.add("estado : firma e identidad son validas ")

        end select

        'extrae la info del firmante, nombre y fecha de la firma
        dim signatureinformation = signatureone.signatureinfo

        listbox1.items.add("firmante " & signatureinformation.name)
        listbox1.items.add("fecha " & signatureinformation.date)

        'extrae la info del certificado
        dim signaturecertificate = signatureinformation.certificates
        listbox1.items.add("emitido : " & signaturecertificate(0).subjectdn.serialnumber)
        listbox1.items.add("numero de serie : " & signaturecertificate(0).serialnumber)
        listbox1.items.add("valido desde : " & signaturecertificate(0).validitystart)
        listbox1.items.add("valido hasta : " & signaturecertificate(0).validityend)
        listbox1.items.add("para : " & signaturecertificate(0).subjectdn.o)
        listbox1.items.add("tipo : " & signaturecertificate(0).subjectdn.ou)
        listbox1.items.add("emitido por : " & signaturecertificate(0).issuerdn.cn)

thanks posting, question, suggestion, useful sample code, what?



More discussions in Acrobat SDK


adobe

Comments

Popular posts from this blog

Object Fitting Keyboard Shortcuts Disfuntional

Markers not showing up after opening a saved project. Where did they go!?

Photoshop javascript: Open files in all subfolders