Sample code for 30+ languages & platforms
Classic ASP

Combine Multiple PKCS12's into a Single Java KeyStore

See more Java KeyStore (JKS) Examples

Combines multiple PKCS12's into a single Java KeyStore (JKS) file. To combine multiple PKCS12 files into a single JKS, simply load each PKCS12 into a PFX object, add it to the Java keystore object via the AddPfx method, and then finally write the Java keystore at the very end.

Chilkat Classic ASP Downloads

Classic ASP
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0

' This requires the Chilkat API to have been previously unlocked.
' See Global Unlock Sample for sample code.

set jks = Server.CreateObject("Chilkat.JavaKeyStore")

set pfx = Server.CreateObject("Chilkat.Pfx")

' Combines several PKCS12's into a single JKS.
' Simply load each, add it to the keystore, and then 
' save at the very end.

jksPassword = "jksSecret"

' Add the 1st PFX...
pfxPassword = "secret1"
success = pfx.LoadPfxFile("/someDir/file1.p12",pfxPassword)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( pfx.LastErrorText) & "</pre>"
    Response.End
End If

alias = "alias1"
success = jks.AddPfx(pfx,alias,jksPassword)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( jks.LastErrorText) & "</pre>"
    Response.End
End If

' Add the 2nd PFX...
pfxPassword = "secret2"
success = pfx.LoadPfxFile("/someDir/file2.p12",pfxPassword)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( pfx.LastErrorText) & "</pre>"
    Response.End
End If

alias = "alias2"
success = jks.AddPfx(pfx,alias,jksPassword)
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( jks.LastErrorText) & "</pre>"
    Response.End
End If

' We can continue adding as many PFX's as desired...

' Write the Java keystore to a file:
success = jks.ToFile(jksPassword,"/jksFiles/my.jks")
If (success <> 1) Then
    Response.Write "<pre>" & Server.HTMLEncode( jks.LastErrorText) & "</pre>"
Else
    Response.Write "<pre>" & Server.HTMLEncode( "Successfully combined multiple PKCS12's into a single JKS") & "</pre>"
End If


%>
</body>
</html>