Xbase++ Requires Chilkat v11.0.0+

Transition from Imap.GetSslServerCert to Imap.GetServerCert

Provides instructions for replacing deprecated GetSslServerCert method calls with GetServerCert. Xbase++

LOCAL nSuccess
LOCAL oImap
LOCAL oCertObj
LOCAL oCert

nSuccess := 0

oImap := CreateObject("Chilkat.Imap")

//  ...
//  ...

//  ------------------------------------------------------------------------
//  The GetSslServerCert method is deprecated:

oCertObj := oImap:GetSslServerCert()
IF (oImap:LastMethodSuccess == 0)
    ? oImap:LastErrorText
    oImap:destroy()
    RETURN
ENDIF

//  ...
//  ...

oCertObj:destroy()

//  ------------------------------------------------------------------------
//  Do the equivalent using GetServerCert.
//  Your application creates a new, empty Cert object which is passed 
//  in the last argument and filled upon success.

oCert := CreateObject("Chilkat.Cert")
nSuccess := oImap:GetServerCert(oCert)
IF (nSuccess == 0)
    ? oImap:LastErrorText
    oImap:destroy()
    oCert:destroy()
    RETURN
ENDIF

oImap:destroy()
oCert:destroy()