最常用的加密类

 1Imports System.Security.Cryptography
 2Imports System.Text
 3Imports System.Text.RegularExpressions
 4 Public Class SecurityClass Security
 5
 6        '*********************************************************************
 7        '
 8        ' Security.Encrypt() Method
 9        '
10        ' The Encrypt method encryts a clean string into a hashed string
11
12        '
13        '*********************************************************************
14        Public Shared Function Encrypt()Function Encrypt(ByVal cleanString As String) As String
15            Dim clearBytes As [Byte]()
16            clearBytes = New UnicodeEncoding().GetBytes(cleanString)
17            Dim hashedBytes As [Byte]() = CType(CryptoConfig.CreateFromName("MD5"), HashAlgorithm).ComputeHash(clearBytes)
18            Dim hashedText As String = BitConverter.ToString(hashedBytes)
19            Return hashedText
20        End Function
21
22    End Class
23

你只要在页面中TxtPassWord.text做为这个函数的参数就可以，很方便的加密方法，加密之后看看数据库哦，全部变成了16进制的数字