(Visual Basic 6.0) Verify the Timestamp Server Token (if any) while Validating a CMS Signature
Demonstrates how to also validate the timestamp server token (if any) while validating a CMS signature.
Dim crypt As New ChilkatCrypt2
' Tell Chilkat to also validate the timestamp token if a timestamp exists in the CMS message's unauthenticated attributes.
Dim cmsOptions As New ChilkatJsonObject
success = cmsOptions.UpdateBool("ValidateTimestampTokens",1)
crypt.CmsOptions = cmsOptions.Emit()
Dim outputFile As String
outputFile = "qa_output/original.xml"
Dim inFile As String
inFile = "qa_data/p7m/fattura_signature.xml.p7m"
' Verify the signature and extract the contained file, which in this case is XML.
Dim success As Long
success = crypt.VerifyP7M(inFile,outputFile)
If (success = 0) Then
Debug.Print crypt.LastErrorText
Exit Sub
End If
Debug.Print "Signature validated."
|
