128 bit blowfish algorithm (General questions)

by sovan, Monday, July 31, 2006, 10:37 (6690 days ago)

Hi there,

I am interested in your product if it gives me what I am after.

I am trying to use your 128 bit Blowfish Encryption, but I am not getting the desired result.

I had used TurboPower Blowfish encryption in my Windows Application and I got this result.

The key we used is - LQSesirpretnENAMATNEC
The String we had encrypted was 1271. and the result I got was - bnWPAaViYy8=

But by using your component to do it I get - STJ2qF6qtxs=.
This is not the result what I am expecting
I am using this code

Dim crypt As New wodCryptCom
Dim i_blob As New MemBlob
Dim o_blob As New MemBlob
i_blob.FromBase64( 1271 )
crypt.Type = CryptoTypes.Blowfish
crypt.SecretKey = LQSesirpretnENAMATNEC
crypt.Optimized = False
crypt.Padding = WODCRYPTCOMLib.CryptoPadding.PadPKCS7
' WODSSHKeyLib.Keys(k = New WODSSHKeyLib.KeysClass)
' k.FromXmlString(m_RSA.ToXmlString(True))
crypt.Encrypt(i_blob, o_blob)
Dim str As String = o_blob.ToBase64
Response.Write(str)
Response.Write( <br> )
i_blob.FromBase64(str)
crypt.Decrypt(i_blob, o_blob)
Response.Write(o_blob.ToBase64)

Please advice how do i get the same result as I am getting in my Windows Application.

Regards
Sovan