Xojo Plugin

Transition from Crypt2.GetSignerCertChain to Crypt2.LastSignerCert

Provides instructions for replacing deprecated GetSignerCertChain method calls with LastSignerCert. Xojo Plugin

Dim success As Boolean
success = False

Dim crypt2 As New Chilkat.Crypt2

// ...
// ...
Dim index As Int32
index = 0

// ------------------------------------------------------------------------
// The GetSignerCertChain method is deprecated:

Dim certchainObj As Chilkat.CertChain
certchainObj = crypt2.GetSignerCertChain(index)
If (crypt2.LastMethodSuccess = False) Then
    System.DebugLog(crypt2.LastErrorText)
    Return
End If

// ...
// ...

// ------------------------------------------------------------------------
// Do the equivalent using LastSignerCert, and then get the certificate chain from the cert.
// Your application creates a new, empty Cert object which is passed 
// in the last argument and filled upon success.

Dim signerCert As New Chilkat.Cert
success = crypt2.LastSignerCert(index,signerCert)
If (success = False) Then
    System.DebugLog(crypt2.LastErrorText)
    Return
End If

Dim certChain As New Chilkat.CertChain
success = signerCert.BuildCertChain(certChain)
If (success = False) Then
    System.DebugLog(signerCert.LastErrorText)
    Return
End If