Metin Şifreleme
Herhangi bir metni şifrelemek için MD5 algoritmasıyla şifrelemek için aşağıdaki metodu kullanabilirsiniz. Bu method kısaca, parametre olarak aldığı string'i şifreleyip size sayılardan oluşan bir string olarak geri döndürür. Public Shared Function EncryptText(ByVal Text As String) As String Dim result_ As String = "" Dim md5Prov_ As new MD5CryptoServiceProvider Dim enc As new System.Text.ASCIIEncoding Dim arrEncrtypt_() As Byte = md5Prov_.ComputeHash(enc.GetBytes(Text)) For i_ As Integer = 0 To arrEncrtypt_.Length - 1 result_ &= arrEncrtypt_(i_).ToString Next Return result_ End Function