I was assigned to do the securities/utilities of our system (E-Commerce Application using ASP (Vbscript). I've developed our login and password utility using VB 6.0. Now I want the password to be encrypted. I've used the functions.... chr, asc and mid .. but i'm not satisfied.. this is the code that i've used..

intLen = Len(txtPass1.Text)
x = Chr(Asc(Mid(txtPass1.Text, 1, intLen)) + 100)

I need another suggestion...

Thanks.

joe