Sample code for 30+ languages & platforms
Xojo Plugin

Transition from Email.GetSignedByCertChain to Email.LastSignerCert

Provides instructions for replacing deprecated GetSignedByCertChain method calls with LastSignerCert.

Chilkat Xojo Plugin Downloads

Xojo Plugin
Dim success As Boolean
success = False

Dim email As New Chilkat.Email

// ...
// ...

// ------------------------------------------------------------------------
// The GetSignedByCertChain method is deprecated:

Dim certChainObj As Chilkat.CertChain
certChainObj = email.GetSignedByCertChain()
If (email.LastMethodSuccess = False) Then
    System.DebugLog(email.LastErrorText)
    Return
End If

// ...
// ...

// ------------------------------------------------------------------------
// Do the equivalent using LastSignerCert to get the signing certificate,
// then build the cert chain from the signing certificate object.

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

// Get the certificate chain from the signer certificate.
Dim certChain As New Chilkat.CertChain
success = signerCert.BuildCertChain(certChain)
If (success = False) Then
    System.DebugLog(signerCert.LastErrorText)
    Return
End If