(Xojo Plugin) Convert DSA DER Private Key to PEM
Converts a DSA private key from DER format to PEM. Demonstrates how to write both encrypted and unencrypted PEM formatted private keys.
// This example requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Dim dsa As New Chilkat.Dsa
// Load a DER private key.
Dim success As Boolean
success = dsa.FromDerFile("dsa_priv.der")
If (success <> True) Then
System.DebugLog(dsa.LastErrorText)
Return
End If
Dim pemStr As String
// Save to unencrypted PEM:
pemStr = dsa.ToPem()
success = dsa.SaveText(pemStr,"dsa_priv.pem")
If (success <> True) Then
System.DebugLog(dsa.LastErrorText)
Return
End If
// Save to encrypted PEM:
pemStr = dsa.ToEncryptedPem("myPassword")
success = dsa.SaveText(pemStr,"dsa_privEncrypted.pem")
If (success <> True) Then
System.DebugLog(dsa.LastErrorText)
Return
End If
System.DebugLog("Finished!")
|