Hello Jochem,

Thanks for  the response! Here is the VB.net code the provides the
encryption:

Imports System.Security.Cryptography
Private Function ComputeHash(ByVal Key As String) As String
Dim objSHA1 As New SHA1CryptoServiceProvider
objSHA1.ComputeHash(System.Text.Encoding.UTF8.GetBytes(Key.ToCharArray))
Dim buffer() As Byte = objSHA1.Hash
Dim HashValue As String = System.Convert.ToBase64String(buffer)
Return HashValue
End Function

CFlib.org UDF:

View the actual function:
http://www.cflib.org/udf.cfm?ID=34

<CFSET message="This is a test">
<CFOUTPUT>
Given message=#message#
The SHA-1 message digest is: #sha1(message)#
</CFOUTPUT>

-----Original Message-----
From: Jochem van Dieten [mailto:[EMAIL PROTECTED]
Sent: Sunday, May 22, 2005 3:27 AM
To: CF-Talk
Subject: Re: String to SHA1 to Base 64 Encryption Help!


Aldon Moore wrote:
> I am completing the integration of a payment processora and the processor
requires me to convert a string to SHA1 then to BASE64. I used a SHA1 UDF
script from Cflib.org for the conversion but in comparison to the string
created by the dotnet SHA1CryptoServiceProvider its different.

Can you show the code and the two strings?

Jochem


~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~|
Logware (www.logware.us): a new and convenient web-based time tracking 
application. Start tracking and documenting hours spent on a project or with a 
client with Logware today. Try it for free with a 15 day trial account.
http://www.houseoffusion.com/banners/view.cfm?bannerid=67

Message: http://www.houseoffusion.com/lists.cfm/link=i:4:207432
Archives: http://www.houseoffusion.com/cf_lists/threads.cfm/4
Subscription: http://www.houseoffusion.com/lists.cfm/link=s:4
Unsubscribe: 
http://www.houseoffusion.com/cf_lists/unsubscribe.cfm?user=11502.10531.4
Donations & Support: http://www.houseoffusion.com/tiny.cfm/54

Reply via email to