ASP Convert String to Byte Array

Chilkat ActiveX Downloads

ActiveX for 32-bit and 64-bit Windows

Demonstrates how to convert a string to a byte array in ASP.

<html>
<body>
<%
set crypt = Server.CreateObject("Chilkat_9_5_0.Crypt2")
crypt.UnlockComponent "anything"

crypt.CryptAlgorithm = "none"
crypt.Charset = "iso-8859-1"

' The string ABCD is Unicode.  The obj.Charset property tells the component
' to (internally) convert each Unicode character to a single-byte iso-8859-1 character.
' iso-8859-1 is identical to us-ascii, but it also includes Western European accented characters.
dim bytArray
bytArray = crypt.EncryptString("ABCD")

' The result a variant containing an array of bytes.  We cannot do much with it in ASP.
' (For those who may want to know, the vartype = 8209.  
' Refer to http://www.w3schools.com/vbscript/func_vartype.asp )
' To access the bytes, we can use the CkData utility object.
' CkData is a free utility component included in the Chilkat Email ActiveX download.

set ckd = CreateObject("ChilkatUtil.CkData")
ckd.LoadBinary bytArray

' Now we can access the individual bytes...
for i = 0 to ckd.NumBytes-1
	Response.Write "<p>" + CStr(i) + ": " + chr(ckd.GetByte(i)) + "</p>"
next

' The original output of crypt.EncryptString is perfect for Response.BinaryWrite...
Response.Write "<p>"
Response.BinaryWrite bytArray
Response.Write "</p>"

%>
</body>
</html>