VB.NET中MD5加密的方法

这篇文章很早之前就发在csdn博客上,现在转发一下

Imports System.IO
Imports System.Security
Imports System.Security.Cryptography
Imports System.Text

    
Public Function funcMD5(ByVal str As StringAs String
        
Return BitConverter.ToString(CType(CryptoConfig.CreateFromName("MD5"), HashAlgorithm).ComputeHash((New UnicodeEncoding).GetBytes(Trim(str))))
    
End Function

posted @ 2006-10-02 01:56  Jailu  阅读(3516)  评论(1编辑  收藏  举报