Acquista i nostri libri consigliati su Amazon.it
+ Rispondi al messaggio
Visualizzazione dei risultati da 1 a 2 su 2

Porre una firma digitale su un PDF

  1. #1
    gatito non è in linea Novello
    Post
    5
    Like Inviati  
    0
    Like Ricevuti  
    0
    Buongiorno a tutti,
    come da titolo ho creato una piccola macro che mi pubblica dei file PDF.

    Vorrei poterli anche firmare digitalmente, e cercando cercando non trovo niente sul web...
    Vorrei che access comunicasse con acrobat per fare questo...
    Per il momento la mia routine di prova è questa:

    Sub SignPDF()
    On Error GoTo Err_Handler
    Dim pdfPDDoc As New AcroPDDoc, oJS As Object, oSign As Object, oPpklite As Object, oFields As Object
    Dim strFName1 As String, strFName2 As String, strSignFName As String
    Dim oSignInfo As Object, strSecInfo As String
    Dim oParam As Parameter
        
       strSignFName = "mycert.pfx"
       strFName1 = "myfilepart.pdf"
       strFName2 = "myfiledest.pdf"
    
       Set pdfPDDoc = CreateObject("AcroExch.PDDoc")
       If pdfPDDoc.Open(strFName1) Then
          Set oJS = pdfPDDoc.GetJSObject
          
          For Each Fields In oJS
            Debug.Print Fields.name
          Next
          Set oFields = oJS.AddField("SignatureField", "signature", 0, Array(350, 800, 500, 750))
          Set oSign = oJS.GetField("SignatureField")
          
          Set oPpklite = oJS.security.getHandler("Adobe.PPKLite", True)
          oPpklite.login "{'', '" & strSignFName & "'}"
          Call oSign.signatureSign(oPpklite, "")
          
          pdfPDDoc.Save 1, strFName2
          oPpklite.logout
       End If
       
    Exit_Proc:
        Exit Sub
            
    Err_Handler:
        MsgBox "In test" & vbCrLf & Err.Number & "--" & Err.Description
        Resume Exit_Proc
    End Sub
    
    Si blocca sempre sulla linea

    Call oSign.signatureSign(oPpklite, "")

    Potete aiutarmi per favore?

    Grazie e buona giornata
    Ultima modifica di TheTruster; 14-12-2020 15:58  Motivo: Aggiunta tag [CODE][/CODE]

  2. #2
    L'avatar di AntonioG
    AntonioG non è in linea Moderatore Globale Ultimo blog: Commodore 64 e Codemotion
    Post
    17,494
    Blogs
    5
    Like Inviati  
    6
    Like Ricevuti  
    34
    I tag CODE per il codice non erano correttamente impostati ... questa volta correggo io ...

    Indica anche il messaggio di errore che hai quando il programma si blocca
    ℹ️ Leggi di più su AntonioG ...

+ Rispondi al messaggio

Potrebbero interessarti anche ...

  1. Firma Digitale
    Da antonio_81 nel forum Visual Basic 6
    Risposte: 0
    Ultimo Post: 03-10-2017, 13:52
  2. Firma digitale
    Da mm2061 nel forum Delphi
    Risposte: 1
    Ultimo Post: 22-09-2015, 23:17
  3. [VB210] Firma Digitale
    Da cris77 nel forum Visual Basic .Net
    Risposte: 0
    Ultimo Post: 27-05-2012, 12:25
  4. Firma digitale
    Da Ste nel forum Altri linguaggi e strumenti
    Risposte: 0
    Ultimo Post: 15-02-2012, 21:22
  5. Firma digitale
    Da Vanessa nel forum Visual Basic .Net
    Risposte: 2
    Ultimo Post: 25-03-2009, 17:45