PowerBuilder

Get Issuer Certificate Information

See more Certificates Examples

A certificate contains information about its issuer. This example demonstrates how to get the issuer information from a certificate. PowerBuilder

integer li_rc
long li_Success
oleobject loo_Cert

li_Success = 0

loo_Cert = create oleobject
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

li_Success = loo_Cert.LoadFromFile("qa_data/certs/sample.cer")
if li_Success = 0 then
    Write-Debug loo_Cert.LastErrorText
    destroy loo_Cert
    return
end if

//  Get issuer information:

//  -----------------------------------------------------------------------
//  (Not all subject fields may exist depending on the issuer certificate.)
//  -----------------------------------------------------------------------

//  Issuer DN (Distinguished Name, i.e. all the Issuer subject parts)
Write-Debug "DN: " + loo_Cert.IssuerDN

//  Common Subject parts:
//  Issuer Common Name
Write-Debug "CN: " + loo_Cert.IssuerCN

//  Issuer Country
Write-Debug "C: " + loo_Cert.IssuerC

//  Issuer Email address
Write-Debug "E: " + loo_Cert.IssuerE

//  Issuer Locality
Write-Debug "L: " + loo_Cert.IssuerL

//  Issuer Organization
Write-Debug "O: " + loo_Cert.IssuerO

//  Issuer Organizational Unit
Write-Debug "OU: " + loo_Cert.IssuerOU

//  Issuer State
Write-Debug "S: " + loo_Cert.IssuerS


destroy loo_Cert