Foxtable(狐表)用户栏目专家坐堂 → MD5加密


  共有5453人关注过本帖树形打印复制链接

主题:MD5加密

帅哥哟,离线,有人找我吗?
有点蓝
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/6 9:20:00 [显示全部帖子]

java没有办法转换为vb使用。请对方提供.net比如C#的代码

 回到顶部
帅哥哟,离线,有人找我吗?
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:109489 积分:557107 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/7/22 15:27:00 [显示全部帖子]

Dim s As String = "要加密的内容"
Using md5 As System.Security.Cryptography.MD5 = System.Security.Cryptography.MD5.Create
    Dim data() As Byte = md5.ComputeHash(Encoding.UTF8.GetBytes(s))
    Dim sBuilder As New StringBuilder()
    For Each t As Byte In data
        sBuilder.Append(t.ToString("x2"))
    Next
    dim 结果 as string =sBuilder.ToString()
    Output.Show(结果 )
End Using

 回到顶部