(Visual Basic 6.0) Transition from Crypt2.GetDecryptCert to Crypt2.LastDecryptCert
Provides instructions for replacing deprecated GetDecryptCert method calls with LastDecryptCert. Note: This example requires Chilkat v11.0.0 or greater.
Dim crypt2 As New ChilkatCrypt2
' ...
' ...
' ------------------------------------------------------------------------
' The GetDecryptCert method is deprecated:
Dim certObj As ChilkatCert
Set certObj = crypt2.GetDecryptCert()
If (crypt2.LastMethodSuccess = 0) Then
Debug.Print crypt2.LastErrorText
Exit Sub
End If
' ...
' ...
' ------------------------------------------------------------------------
' Do the equivalent using LastDecryptCert.
' Your application creates a new, empty Cert object which is passed
' in the last argument and filled upon success.
Dim certOut As New ChilkatCert
Dim success As Long
success = crypt2.LastDecryptCert(certOut)
If (success = 0) Then
Debug.Print crypt2.LastErrorText
Exit Sub
End If
|