Classic ASP

Example: Crypt2.GenRandomBytesENC method

Shows how to use the GenRandomBytesENC method to generate a specified number of random bytes and return them as a binary encoded string, such as in base64 or hex format. Classic ASP

<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8">
</head>
<body>
<%
set crypt = Server.CreateObject("Chilkat.Crypt2")

'  Example of a some of the binary encodings supported by Chilkat.

'  Internally uses the Fortuna cryptographically secure random number generation algorithm
'  auto-seeded from a secure source of entropy that depends on the OS.

crypt.EncodingMode = "hex"
s = crypt.GenRandomBytesENC(8)
Response.Write "<pre>" & Server.HTMLEncode( "Uppercase Hex: " & s) & "</pre>"

crypt.EncodingMode = "hex_lower"
s = crypt.GenRandomBytesENC(8)
Response.Write "<pre>" & Server.HTMLEncode( "Lowercase Hex: " & s) & "</pre>"

crypt.EncodingMode = "base64"
s = crypt.GenRandomBytesENC(8)
Response.Write "<pre>" & Server.HTMLEncode( "Base64: " & s) & "</pre>"

crypt.EncodingMode = "base64url"
s = crypt.GenRandomBytesENC(8)
Response.Write "<pre>" & Server.HTMLEncode( "Base64Url: " & s) & "</pre>"

crypt.EncodingMode = "base58"
s = crypt.GenRandomBytesENC(8)
Response.Write "<pre>" & Server.HTMLEncode( "Base58: " & s) & "</pre>"

crypt.EncodingMode = "base32"
s = crypt.GenRandomBytesENC(8)
Response.Write "<pre>" & Server.HTMLEncode( "Base32: " & s) & "</pre>"

crypt.EncodingMode = "decList"
s = crypt.GenRandomBytesENC(8)
Response.Write "<pre>" & Server.HTMLEncode( "Decimal List: " & s) & "</pre>"

'  Sample Output:

'  Uppercase Hex: 1BA0E87915C3B429
'  Lowercase Hex: 1e1638a1c7996c58
'  Base64: 1lV0I/su5lg=
'  Base64Url: Zq7DU0nukLk
'  Base58: foUVWUjAT6e
'  Base32: LHV5RV4HRCLW2===
'  Decimal List: 168,55,214,82,93,154,191,164

%>
</body>
</html>