<%@ Import Namespace="System.Web.Security" %> <html> <head> <script language="VB" runat=server> Sub encryptString(Src As Object, E As EventArgs) SHA1.Text = CookieAuthentication.HashPasswordForStoringInConfigFile(txtPassword.Text, "SHA1") MD5.Text = CookieAuthentication.HashPasswordForStoringInConfigFile(txtPassword.Text, "MD5") End Sub </script> </head> <body>
<p><b>Encrypted Password In SHA1: </b> <asp:label id="SHA1" runat=server /></p>
<p><b>Encrypted Password In MD5: </b> <asp:label id="MD5" runat=server /></p>
</form>
</body>
</html>
怎么样加密一串字符串是很容易的事,为了使它更容易使用我制作了一个函数。下面我就给出函数的源代码.
Function EncryptPassword (PasswordString as String, PasswordFormat as String) as String If PasswordFormat = "SHA1" then EncryptPassword = CookieAuthentication.HashPasswordForStoringInConfigFile(PasswordString, "SHA1") Elseif PasswordFormat = "MD5" then EncryptPassword= CookieAuthentication.HashPasswordForStoringInConfigFile(PasswordString, "MD5") Else EncryptPassword = "" End if End Function