Print Byte Array as Decimal Integers

Prints the byte values in a byte array as decimal integers.

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%

'  
Dim key
For i = 0 To 15
key = key & ChrB(i)
Next


' Display the bytes as decimal integers:
Dim s
s = ""
For i = 1 To LenB(key)
    s = s & CStr(AscB(MidB(key, i, 1))) & ","
Next
Response.Write "<p>" & s & "</p>"

'Output: 0,1,2,3,4,5,6,7,8,9,10,11,12,13,14,15,

%>
</body>
</html>

Need a specific example? Send a request to support@chilkatsoft.com