Chilkat HOME .NET Core C# Android™ AutoIt C C# C++ Chilkat2-Python CkPython Classic ASP DataFlex Delphi ActiveX Delphi DLL Go Java Lianja Mono C# Node.js Objective-C PHP ActiveX PHP Extension Perl PowerBuilder PowerShell PureBasic Ruby SQL Server Swift 2 Swift 3,4,5... Tcl Unicode C Unicode C++ VB.NET VBScript Visual Basic 6.0 Visual FoxPro Xojo Plugin
(PowerBuilder) Change Password for Java KeyStore FileDemonstrates how to load a Java keystore, change the password, and save using the new password. If the Java keystore contains only trusted root certificates, then it's simply a matter of loading the JKS with the existing password, and then saving with a new password. If the JKS contains private key entries, then each private key entry must be re-keyed using the new password by calling the ChangePassword method.
integer li_rc oleobject loo_Jks string ls_OldJksPassword string ls_NewJksPassword string ls_JksPath integer li_Success integer li_NumPrivateKeys integer i // This requires the Chilkat API to have been previously unlocked. // See Global Unlock Sample for sample code. loo_Jks = create oleobject // Use "Chilkat_9_5_0.JavaKeyStore" for versions of Chilkat < 10.0.0 li_rc = loo_Jks.ConnectToNewObject("Chilkat.JavaKeyStore") if li_rc < 0 then destroy loo_Jks MessageBox("Error","Connecting to COM object failed") return end if ls_OldJksPassword = "existingPassword" ls_NewJksPassword = "newPassword" ls_JksPath = "/someDir/keyStore.jks" // Load the Java keystore from a file. li_Success = loo_Jks.LoadFile(ls_OldJksPassword,ls_JksPath) if li_Success <> 1 then Write-Debug loo_Jks.LastErrorText destroy loo_Jks return end if // If the JKS contains private key entries, then each // must be re-keyed with the new password by calling ChangePassword. li_NumPrivateKeys = loo_Jks.NumPrivateKeys i = 0 do while i < li_NumPrivateKeys li_Success = loo_Jks.ChangePassword(i,ls_OldJksPassword,ls_NewJksPassword) if li_Success <> 1 then Write-Debug loo_Jks.LastErrorText destroy loo_Jks return end if i = i + 1 loop // Write the JKS using the new password for the JKS file's keyed digest. li_Success = loo_Jks.ToFile(ls_NewJksPassword,ls_JksPath) if li_Success <> 1 then Write-Debug loo_Jks.LastErrorText destroy loo_Jks return end if Write-Debug "Updated the password for the Java keystore file." destroy loo_Jks |
© 2000-2024 Chilkat Software, Inc. All Rights Reserved.