- Foxtable(狐表) (http://www.foxtable.com/bbs/index.asp)
-- 专家坐堂 (http://www.foxtable.com/bbs/list.asp?boardid=2)
---- [求助]请问老师如何将字串转换 SHA256,再转换为大写 (http://www.foxtable.com/bbs/dispbbs.asp?boardid=2&id=103501)
-- 发布时间：2017/7/10 13:13:00
-- [求助]请问老师如何将字串转换 SHA256,再转换为大写
请问老师如何将字串转换 SHA256,再转换为大写
-- 发布时间：2017/7/10 13:25:00
--
Output.Show(Ucase("sha256"))
-- 发布时间：2017/7/10 14:08:00
--
http://www.foxtable.com/webhelp/scr/0238.htm
-- 发布时间：2017/7/10 14:35:00
--
安全散列算法SHA（Secure Hash Algorithm）是美国国家安全局 （NSA） 设计，美国国家标准与技术研究院（NIST） 发布的一系列密码散列函数，
包括 SHA-1、SHA-224、SHA-256、SHA-384 和 SHA-512 等变体。
主要适用于数字签名标准（DigitalSignature Standard DSS）里面定义的数字签名算法（Digital Signature Algorithm DSA）。
-- 发布时间：2017/7/10 15:18:00
--
这个？
Dim strData = "123456"
Dim bytValue As Byte() = System.Text.Encoding.UTF8.GetBytes(strData)
Try
Dim sha256 As New System.Security.Cryptography.SHA256Managed
Dim retVal As Byte() = sha256.ComputeHash(bytValue)
Dim sb As New StringBuilder()
For i As Integer = 0 To retVal.Length - 1
sb.Append(retVal(i).ToString("x2"))
Next
Return sb.ToString().toupper
Catch ex As Exception
msgbox(ex.Message)
End Try
-- 发布时间：2017/7/10 16:02:00
--
太感謝了！
