Chilkat
HOME
Android™
ASP
Visual Basic
VB.NET
C#
iOS (IPhone)
Objective-C
C++
C
MFC
Delphi
FoxPro
Java
Perl
PHP Extension
PHP ActiveX
Python
PowerShell
Ruby
SQL Server
VBScript
|
|
Twofish Encrypt Strings
This ASP script shows how to Twofish encrypt strings. <html>
<head>
<title>Twofish Encrypt Strings in ASP</title>
</head>
<body>
<%
' ASP script to Twofish encrypt strings
set crypt = Server.CreateObject("Chilkat.Crypt2")
' Any value passed to UnlockComponent begins the 30-day trial.
unlocked = crypt.UnlockComponent("30-day")
if unlocked then
' Note: Encrypted data is padded to a multiple of 16 bytes.
crypt.CryptAlgorithm = "twofish"
' The key length can be 128, 192, or 256
crypt.KeyLength = 128
' Set the password.
crypt.SecretKey = crypt.GenerateSecretKey("myPassword")
' Encrypt a string. Return the encrypted data as a URL-encoded string.
crypt.EncodingMode = "url"
Response.Write "<br><br><b>URL-encoded Twofish Encrypted String:</b><br>"
Response.Write crypt.EncryptStringENC("123")
' Encrypt a string. Return the encrypted data as a base64-encoded string.
crypt.EncodingMode = "base64"
Response.Write "<br><br><b>Base64 Twofish Encrypted String:</b><br>"
Response.Write crypt.EncryptStringENC("123")
' Encrypt a string. Return the encrypted data as a hex-encoded string.
crypt.EncodingMode = "hex"
Response.Write "<br><br><b>Hexidecimalized Twofish Encrypted String:</b><br>"
encryptedStr = crypt.EncryptStringENC("123")
Response.Write encryptedStr
' Decrypt the string.
Response.Write "<br><br><b>Decrypted:</b><br>"
Response.Write crypt.DecryptStringENC(encryptedStr)
else
Response.Write "Crypt object is not unlocked!"
end if
%>
</body>
</html>
|
© 2000-2012 Chilkat Software, Inc. All Rights Reserved.