关于MD5加密的问题!

wnobleman 2003-10-15 09:12:39
根据MD5CryptoServiceProvider写的一个类!

但是有个问题,其输出的形式是6C-D7-10-71-CC-D0-ED-FE-75-00-23-1C-77-EE-A5-72这样的,与以前的不兼容,具体代码如下,请问如何修改可以将其转换为6CD71071CCD0EDFE7500231C77EEA572形式!

Imports System
Imports System.Security
Imports System.Security.Cryptography

Public Class MD5Class
Private objMD5 As MD5CryptoServiceProvider
Private arrHashInput As Byte()
Private arrHashOutput As Byte()

Sub New()
objMD5 = New MD5CryptoServiceProvider()
End Sub

Private Function ConvertByteArray(ByVal strInput As String) As Byte()
Dim intCount As Integer
Dim arrChar As Char()

arrChar = strInput.ToCharArray()

Dim arrByte(arrChar.Length - 1) As Byte

For intCount = 0 To arrByte.Length - 1
arrByte(intCount) = Convert.ToByte(arrChar(intCount))
Next

Return arrByte
End Function

Public Function MD5(ByVal strInput As String) As String
Dim strRet As String

arrHashInput = ConvertByteArray(strInput)

arrHashOutput = objMD5.ComputeHash(arrHashInput)

strRet = BitConverter.ToString(arrHashOutput)

Return strRet
End Function
End Class
...全文
50 2 打赏 收藏 转发到动态 举报
写回复
用AI写文章
2 条回复
切换为时间正序
请发表友善的回复…
发表回复
wnobleman 2003-10-16
  • 打赏
  • 举报
回复
总不能让我用REPLEACE吧!
zsww 2003-10-15
  • 打赏
  • 举报
回复
学习!!!
帮你顶!

-------努力学习 不断实践 虚心讨教--------

62,025

社区成员

发帖
与我相关
我的任务
社区描述
.NET技术交流专区
javascript云原生 企业社区
社区管理员
  • ASP.NET
  • .Net开发者社区
  • R小R
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告

.NET 社区是一个围绕开源 .NET 的开放、热情、创新、包容的技术社区。社区致力于为广大 .NET 爱好者提供一个良好的知识共享、协同互助的 .NET 技术交流环境。我们尊重不同意见,支持健康理性的辩论和互动,反对歧视和攻击。

希望和大家一起共同营造一个活跃、友好的社区氛围。

试试用AI创作助手写篇文章吧