(PowerBuilder) 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.

Chilkat ActiveX Downloads ActiveX for 32-bit and 64-bit Windows

integer li_rc
oleobject loo_Crypt
string s

loo_Crypt = create oleobject
li_rc = loo_Crypt.ConnectToNewObject("Chilkat.Crypt2")
if li_rc < 0 then
    destroy loo_Crypt
    MessageBox("Error","Connecting to COM object failed")
    return
end if

// 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.

loo_Crypt.EncodingMode = "hex"
s = loo_Crypt.GenRandomBytesENC(8)
Write-Debug "Uppercase Hex: " + s

loo_Crypt.EncodingMode = "hex_lower"
s = loo_Crypt.GenRandomBytesENC(8)
Write-Debug "Lowercase Hex: " + s

loo_Crypt.EncodingMode = "base64"
s = loo_Crypt.GenRandomBytesENC(8)
Write-Debug "Base64: " + s

loo_Crypt.EncodingMode = "base64url"
s = loo_Crypt.GenRandomBytesENC(8)
Write-Debug "Base64Url: " + s

loo_Crypt.EncodingMode = "base58"
s = loo_Crypt.GenRandomBytesENC(8)
Write-Debug "Base58: " + s

loo_Crypt.EncodingMode = "base32"
s = loo_Crypt.GenRandomBytesENC(8)
Write-Debug "Base32: " + s

loo_Crypt.EncodingMode = "decList"
s = loo_Crypt.GenRandomBytesENC(8)
Write-Debug "Decimal List: " + s

// 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


destroy loo_Crypt