Classic ASP
Classic ASP
Encrypt Binary Content to a JWE
See more JSON Web Encryption (JWE) Examples
Demonstrates Jwe.EncryptBd, which encrypts binary content held in a BinData and writes the resulting JWE into a StringBuilder.
Background. JWE (JSON Web Encryption) protects content with a content-encryption algorithm (the header
enc value) while the content-encryption key is managed by the key-management algorithm (the header alg value). This example uses AES key wrapping with a symmetric wrapping key.Chilkat Classic ASP Downloads
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
success = 0
set jwe = Server.CreateObject("Chilkat.Jwe")
' Set the JWE protected header, specifying the key-management algorithm (alg) and the content-
' encryption algorithm (enc).
set header = Server.CreateObject("Chilkat.JsonObject")
success = header.UpdateString("alg","A256KW")
success = header.UpdateString("enc","A256GCM")
success = jwe.SetProtectedHeader(header)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( jwe.LastErrorText) & "</pre>"
Response.End
End If
' The 256-bit key-wrapping key (base64) for recipient index 0. In production, obtain the key
' from a secure source rather than hard-coding it.
base64Key = "YWJjZGVmZ2hpamtsbW5vcHFyc3R1dnd4eXowMTIzNDU="
success = jwe.SetWrappingKey(0,base64Key,"base64")
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( jwe.LastErrorText) & "</pre>"
Response.End
End If
' Encrypt binary content held in a BinData, writing the resulting JWE into a StringBuilder.
set bdContent = Server.CreateObject("Chilkat.BinData")
success = bdContent.AppendString("Binary content to encrypt.","utf-8")
set sbJwe = Server.CreateObject("Chilkat.StringBuilder")
success = jwe.EncryptBd(bdContent,sbJwe)
If (success = 0) Then
Response.Write "<pre>" & Server.HTMLEncode( jwe.LastErrorText) & "</pre>"
Response.End
End If
Response.Write "<pre>" & Server.HTMLEncode( sbJwe.GetAsString()) & "</pre>"
%>
</body>
</html>