B4X

Extract XML File from a .p7m (e.g. FATTURA ELETTRONICA, ITALY)

See more Digital Signatures Examples

_LANGUAGE_ example to extract the original file from a .p7m (Signed-Data PKCS7 Format) The .p7m contains the signed contents of the original file.

One use for this example is to extract the XML file from a Fattura Elettronica .p7m signature.

B4X

Dim success As Boolean = False

'  This example requires the Chilkat API to have been previously unlocked.
'  See Global Unlock Sample for sample code.

Dim crypt As ChilkatCrypt2
crypt.Initialize("crypt")

Dim outputFile As String = "testData/xml/original.xml"
Dim inFile As String = "testData/p7m/fattura_signature.p7m"

'  Verify the signature and extract the XML file.
success = crypt.VerifyP7M(inFile, outputFile)
If success = False Then
    Log(crypt.LastErrorText)
    Return
End If


Log("Success!")