(AutoIt) Combine Multiple PKCS12's into a Single Java KeyStore

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 ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

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

$oJks = ObjCreate("Chilkat.JavaKeyStore")

$oPfx = ObjCreate("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.

Local $sAlias
Local $sPfxPassword
Local $sJksPassword = "jksSecret"

; Add the 1st PFX...
$sPfxPassword = "secret1"
Local $bSuccess = $oPfx.LoadPfxFile("/someDir/file1.p12",$sPfxPassword)
If ($bSuccess <> True) Then
    ConsoleWrite($oPfx.LastErrorText & @CRLF)
    Exit
EndIf

$sAlias = "alias1"
$bSuccess = $oJks.AddPfx($oPfx,$sAlias,$sJksPassword)
If ($bSuccess <> True) Then
    ConsoleWrite($oJks.LastErrorText & @CRLF)
    Exit
EndIf

; Add the 2nd PFX...
$sPfxPassword = "secret2"
$bSuccess = $oPfx.LoadPfxFile("/someDir/file2.p12",$sPfxPassword)
If ($bSuccess <> True) Then
    ConsoleWrite($oPfx.LastErrorText & @CRLF)
    Exit
EndIf

$sAlias = "alias2"
$bSuccess = $oJks.AddPfx($oPfx,$sAlias,$sJksPassword)
If ($bSuccess <> True) Then
    ConsoleWrite($oJks.LastErrorText & @CRLF)
    Exit
EndIf

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

; Write the Java keystore to a file:
$bSuccess = $oJks.ToFile($sJksPassword,"/jksFiles/my.jks")
If ($bSuccess <> True) Then
    ConsoleWrite($oJks.LastErrorText & @CRLF)
Else
    ConsoleWrite("Successfully combined multiple PKCS12's into a single JKS" & @CRLF)
EndIf