(Xojo Plugin) Convert PKCS12 / PFX to Java KeyStore
Converts a PKCS12 / PFX file to a Java keystore (JKS) file.
// This requires the Chilkat API to have been previously unlocked.
// See Global Unlock Sample for sample code.
Dim jks As New Chilkat.JavaKeyStore
Dim pfx As New Chilkat.Pfx
Dim pfxPassword As String
pfxPassword = "secret"
// Load a PKCS12 from a file.
Dim success As Boolean
success = pfx.LoadPfxFile("/someDir/my.p12",pfxPassword)
If (success <> True) Then
System.DebugLog(pfx.LastErrorText)
Return
End If
Dim alias As String
alias = "someAlias"
Dim jksPassword As String
jksPassword = "jksSecret"
// Add the PKCS12 to the empty Java keystore object:
success = jks.AddPfx(pfx,alias,jksPassword)
If (success <> True) Then
System.DebugLog(jks.LastErrorText)
Return
End If
// Write the Java keystore to a file:
success = jks.ToFile(jksPassword,"/jksFiles/my.jks")
If (success <> True) Then
System.DebugLog(jks.LastErrorText)
Else
System.DebugLog("Successfully converted PKCS12 to JKS")
End If
|