Chilkat • HOME • Android™ • AutoIt • C • C# • C++ • Chilkat2-Python • CkPython • Classic ASP • DataFlex • Delphi DLL • Go • Java • Node.js • Objective-C • PHP Extension • Perl • PowerBuilder • PowerShell • PureBasic • Ruby • SQL Server • Swift • Tcl • Unicode C • Unicode C++ • VB.NET • VBScript • Visual Basic 6.0 • Visual FoxPro • Xojo Plugin
(Xojo Plugin) Load JWK into PublicKey ObjectDemonstrates how to load a Java Web Key (JWK) into a Chilkat public key object. Note: This example requires Chilkat v9.5.0.66 or greater.
// Imagine we have this JWK: // { // "kty":"RSA", // "kid":"bilbo.baggins@hobbiton.example", // "use":"sig", // "n":"26381066103266289976070039679240841999340706859156341823971393693544846472963839705790075117105560154606562987481050889935247188300178764426769543782451174831475924241862817098997865881169498995546309260357488285676768114714548754913374731868063116787903918383610614912211576698081222844057810710088656983077876282582286966085572172471849443305250452393766960762340311496052418952315081937000716222751229644449475751932222180738210988190709824209639002026650048655399108647971010890335494074025258268035713167380057822555485524738518699437692145859633592396626258745090144803752145540471688039673495588314804430463791", // "e":"65537" // } // Dim sbJwk As New Chilkat.StringBuilder Dim success As Boolean success = sbJwk.LoadFile("qa_data/jwk/simple_jwk_rsa.json","utf-8") If (success <> True) Then System.DebugLog("Failed to load simple JWK file.") Return End If // Loading it into a Chilkat public key object is easy: Dim pubkey As New Chilkat.PublicKey success = pubkey.LoadFromString(sbJwk.GetAsString()) If (success <> True) Then System.DebugLog(pubkey.LastErrorText) Return End If System.DebugLog("Simple JWK loaded into public key object.") // ---------------------------------------------------------------------------------------------------------- // Demonstrate how to load a JWK that is contained within JSON into a public key object. // { // "alg":"RS256", // "jwk": { // "kty":"RSA", // "kid":"bilbo.baggins@hobbiton.example", // "use":"sig", // "n":"26381066103266289976070039679240841999340706859156341823971393693544846472963839705790075117105560154606562987481050889935247188300178764426769543782451174831475924241862817098997865881169498995546309260357488285676768114714548754913374731868063116787903918383610614912211576698081222844057810710088656983077876282582286966085572172471849443305250452393766960762340311496052418952315081937000716222751229644449475751932222180738210988190709824209639002026650048655399108647971010890335494074025258268035713167380057822555485524738518699437692145859633592396626258745090144803752145540471688039673495588314804430463791", // "e":"65537" // } // } Dim sbJwk2 As New Chilkat.StringBuilder success = sbJwk2.LoadFile("qa_data/jwk/contained_jwk_rsa.json","utf-8") If (success <> True) Then System.DebugLog("Failed to load JWK file.") Return End If // Get the "jwk" part of the JSON.. Dim json As New Chilkat.JsonObject success = json.Load(sbJwk2.GetAsString()) Dim jsonJwk As Chilkat.JsonObject jsonJwk = json.ObjectOf("jwk") If (json.LastMethodSuccess <> True) Then System.DebugLog("No jwk member exists.") Return End If Dim pubkey2 As New Chilkat.PublicKey success = pubkey2.LoadFromString(jsonJwk.Emit()) If (success <> True) Then System.DebugLog(pubkey2.LastErrorText) Return End If System.DebugLog("Contained JWK loaded into public key object.") |
© 2000-2025 Chilkat Software, Inc. All Rights Reserved.