(PureBasic) Example: Http.GetServerCert method
Demonstrates how to call the GetServerCert method. Note: This example requires Chilkat v11.0.0 or greater.
IncludeFile "CkCert.pb"
IncludeFile "CkHttp.pb"
Procedure ChilkatExample()
success.i = 0
http.i = CkHttp::ckCreate()
If http.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
cert.i = CkCert::ckCreate()
If cert.i = 0
Debug "Failed to create object."
ProcedureReturn
EndIf
success = CkHttp::ckGetServerCert(http,"chilkatsoft.com",443,cert)
If success = 0
Debug CkHttp::ckLastErrorText(http)
CkHttp::ckDispose(http)
CkCert::ckDispose(cert)
ProcedureReturn
EndIf
Debug CkCert::ckSubjectDN(cert)
Debug CkCert::ckValidToStr(cert)
; Output:
; CN=*.chilkatsoft.com
; Wed, 10 Jun 2026 23:59:59 GMT
CkHttp::ckDispose(http)
CkCert::ckDispose(cert)
ProcedureReturn
EndProcedure
|