(PowerBuilder) Get Text Certificate Extensions by OID

See more Certificates Examples

Most certificate extensions have values that are ASN.1 (binary). For the majority of cases, an application should call GetExtensionAsXml. For extensions known to have text values (such as the OIDs listed above), an application can instead call GetExtensionAsText.

The GetExtensionAsText method is added in Chilkat v9.5.0.89.

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

integer li_rc
oleobject loo_Cert
integer li_Success
string ls_Oid
string ls_Str

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

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

ls_Oid = "1.3.6.1.4.1.49952.5.8.5"
ls_Str = loo_Cert.GetExtensionAsText(ls_Oid)
if loo_Cert.LastMethodSuccess = 1 then
    Write-Debug ls_Oid + ": " + ls_Str
end if

ls_Oid = "1.3.6.1.4.1.49952.5.8.6"
ls_Str = loo_Cert.GetExtensionAsText(ls_Oid)
if loo_Cert.LastMethodSuccess = 1 then
    Write-Debug ls_Oid + ": " + ls_Str
end if

ls_Oid = "1.3.6.1.4.1.49952.5.8.7"
ls_Str = loo_Cert.GetExtensionAsText(ls_Oid)
if loo_Cert.LastMethodSuccess = 1 then
    Write-Debug ls_Oid + ": " + ls_Str
end if



destroy loo_Cert