VB.NET
VB.NET
Get Text Certificate Extensions by OID
See more Certificates Examples
Demonstrates how to get text certificate extensions by OID. In this example, we have a certificate with the following OID extensions: 1.3.6.1.4.1.49952.5.8.5, 1.3.6.1.4.1.49952.5.8.6, 1.3.6.1.4.1.49952.5.8.7.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 VB.NET Downloads
Dim success As Boolean = False
Dim cert As New Chilkat.Cert
success = cert.LoadFromFile("qa_data/certs/PUH9.cer")
If (success = False) Then
Debug.WriteLine(cert.LastErrorText)
Exit Sub
End If
Dim oid As String = "1.3.6.1.4.1.49952.5.8.5"
Dim str As String = cert.GetExtensionAsText(oid)
If (cert.LastMethodSuccess = True) Then
Debug.WriteLine(oid & ": " & str)
End If
oid = "1.3.6.1.4.1.49952.5.8.6"
str = cert.GetExtensionAsText(oid)
If (cert.LastMethodSuccess = True) Then
Debug.WriteLine(oid & ": " & str)
End If
oid = "1.3.6.1.4.1.49952.5.8.7"
str = cert.GetExtensionAsText(oid)
If (cert.LastMethodSuccess = True) Then
Debug.WriteLine(oid & ": " & str)
End If