(Visual Basic 6.0) Example: Crypt2.ClearSigningCerts method
Demonstrates how to call the ClearSigningCerts method.
Dim crypt As New ChilkatCrypt2
Dim success As Long
success = 0
' Tell the crypt object to use 3 certificates.
' Do this by calling AddSigningCert for each certificate.
Dim cert1 As New ChilkatCert
' ...
' Load the cert from a source such as a .pfx/.p12 file, smart card, USB token, Apple keychain, Windows certificate store, etc.
' ...
success = crypt.AddSigningCert(cert1)
Dim cert2 As New ChilkatCert
' ...
success = crypt.AddSigningCert(cert2)
Dim cert3 As New ChilkatCert
' ...
success = crypt.AddSigningCert(cert3)
Dim bd As New ChilkatBinData
' ...
success = crypt.OpaqueSignBd(bd)
' Let's say we now want to sign something else with different certs..
' First clear the signing certs.
crypt.ClearSigningCerts
Dim cert4 As New ChilkatCert
' ...
success = crypt.AddSigningCert(cert4)
Dim cert5 As New ChilkatCert
' ...
success = crypt.AddSigningCert(cert5)
' ...
' ...
' Sign using cert4 and cert5.
success = crypt.OpaqueSignBd(bd)
|
