B4X

Serialize a PFX to an Encoded String

Demonstrates Pfx.ToEncodedString, which serializes the current PFX contents and returns the PKCS#12 bytes encoded as text using a named encoding.

Background. Common encodings are base64 and hex. This is convenient when the PKCS#12 data must be stored or transmitted as printable text.

Chilkat B4X Downloads

Download Chilkat for B4X

B4X

Dim success As Boolean = False

Dim pfx As ChilkatPfx
pfx.Initialize

'  The file path is relative to the application's current working directory.  An absolute path
'  may also be used.  Supply the path appropriate to your own environment.
'  The PFX password should come from a secure source rather than being hard-coded.
Dim password As String = "myPfxPassword"
success = pfx.LoadPfxFile("qa_data/identity.pfx", password)
If success = False Then
    Log(pfx.LastErrorText)
    Return
End If


'  Serialize the PFX contents using the given output password and return the PKCS#12 bytes encoded as
'  text.  Common encodings include base64 and hex.
Dim outputPassword As String = "myOutputPassword"
Dim encoded As String = pfx.ToEncodedString(outputPassword, "base64")
If pfx.LastMethodSuccess = False Then
    Log(pfx.LastErrorText)
    Return
End If

Log(encoded)