(PowerBuilder) Create X509PKIPathv1 Containing one Certificate

Demonstrates how to create a X509PKIPathv1 containing one certificate.

Note: This example requires Chilkat v9.5.0.77 or later.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Cert
integer li_Success
string s

loo_Cert = create oleobject
// Use "Chilkat_9_5_0.Cert" for versions of Chilkat < 10.0.0
li_rc = loo_Cert.ConnectToNewObject("Chilkat.Cert")
if li_rc < 0 then
    destroy loo_Cert
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// There are many ways to load a certificate -- from a file, from a string or memory, etc.,
// and from many different formats.  This example loads the cert from a PEM file.
// (LoadFromFile will auto-recognize the format.)
li_Success = loo_Cert.LoadFromFile("qa_data/certs/brasil_cert.pem")
if li_Success = 0 then
    Write-Debug loo_Cert.LastErrorText
    destroy loo_Cert
    return
end if

// Get the X509PKIPathv1 in base64 format (single line)
s = loo_Cert.X509PKIPathv1()
if loo_Cert.LastMethodSuccess = 0 then
    Write-Debug loo_Cert.LastErrorText
    destroy loo_Cert
    return
end if

Write-Debug "X509PKIPathv1: " + s


destroy loo_Cert