List CSP Encryption Algorithms
This ASP script lists the encryption algorithms provided by the Microsoft Enhanced CSP
<html>
<head>
<title>List Encryption Algorithms</title>
</head>
<body>
<%
set csp = Server.CreateObject("Chilkat_9_5_0.Csp")
' Select the Microsoft Enhanced Cryptographic Service Provider
csp.SetProviderMicrosoftEnhanced
' List the encryption algorithms provided by the Enhanced Microsoft CSP.
' A sample output looks like this:
'Encryption Algorithms:
'0: RC2(128 bits)
'1: RC4(128 bits)
'2: DES(56 bits)
'3: 3DES TWO KEY(112 bits)
'4: 3DES(168 bits)
Response.write "<b>Encryption Algorithms:</b><br>"
n = csp.NumEncryptAlgorithms
for i = 0 to n-1
Response.Write i & ": " & csp.GetEncryptionAlgorithm(i)
Response.Write "(" & csp.GetEncryptionNumBits(i) & " bits)<br>"
next
%>
</body>
</html>
|
