摘要: 1 Imports System.Text 2 Imports System.Security.Cryptography 3 4 Function getMD5Hash(ByVal strToHash As String) As String 5 Dim md5Obj As New Security.Cryptography.MD5CryptoServiceProvider 6 Dim bytesToHash() As Byte = System.Text.Encoding.ASCII.GetBytes(strToHash) 7 by... 阅读全文
posted @ 2012-02-05 13:55 imlion 阅读(371) 评论(0) 推荐(0)