Xbase++

Require that the Web Server's SSL Certificate is Non-Expired and the Signature is Valid

Demonstrates setting the RequireSslCertVerify property to require that the web server's SSL/TLS certificate is non-expired and that the certificate's signature is valid. Xbase++

LOCAL cUrl
LOCAL oHttp
LOCAL cHtml

//  This example assumes the Chilkat HTTP API to have been previously unlocked.
//  See Global Unlock Sample for sample code.

cUrl := "https://chilkatsoft.com"

oHttp := CreateObject("Chilkat.Http")
oHttp:RequireSslCertVerify := 1

cHtml := oHttp:QuickGetStr(cUrl)
IF (oHttp:LastMethodSuccess != 1)
    ? oHttp:LastErrorText
    oHttp:destroy()
    RETURN
ENDIF

? "Success."

oHttp:destroy()