(Classic ASP) MIME Header Q and B Encoding and Decoding

Demonstrates how to Q and B encode/decode.

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder")
set sb = Server.CreateObject("Chilkat.StringBuilder")

success = sb.Append("This is a test")

Response.Write "<pre>" & Server.HTMLEncode( sb.GetEncoded("B","utf-8")) & "</pre>"
' output is:
' =?utf-8?B?VGhpcyBpcyBhIHRlc3Q=?=

Response.Write "<pre>" & Server.HTMLEncode( sb.GetEncoded("Q","iso-8859-1")) & "</pre>"
' output is:
' =?utf-8?Q?This_is_a_test?=

' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder")
set sb2 = Server.CreateObject("Chilkat.StringBuilder")

success = sb2.Append("=?utf-8?B?VGhpcyBpcyBhIHRlc3Q=?=")
success = sb2.Decode("B","utf-8")
Response.Write "<pre>" & Server.HTMLEncode( sb2.GetAsString()) & "</pre>"

' output is:
' This is a test

sb2.Clear 
success = sb2.Append("=?utf-8?Q?This_is_a_test?=")
success = sb2.Decode("Q","utf-8")
Response.Write "<pre>" & Server.HTMLEncode( sb2.GetAsString()) & "</pre>"

' output is:
' This is a test

' "B" or "Q" will decode both B and Q.
sb2.Clear 
success = sb2.Append("=?utf-8?Q?This_is_a_test?= 123 =?utf-8?B?VGhpcyBpcyBhIHRlc3Q=?=")
success = sb2.Decode("Q","utf-8")
Response.Write "<pre>" & Server.HTMLEncode( sb2.GetAsString()) & "</pre>"

' output is:
' This is a test 123 This is a test

%>
</body>
</html>