Foxtable(狐表)用户栏目专家坐堂 → 定义HMAC提示错误


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

主题:定义HMAC提示错误

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


加好友 发短信
等级:幼狐 帖子:103 积分:1228 威望:0 精华:0 注册:2017/5/16 22:42:00
定义HMAC提示错误  发帖心情 Post By:2022/10/19 20:43:00 [只看该作者]

老师好!以下代码是.net代码
            // 签名计算  signStr--signData--finalData--signature
            HMAC m = HMACSHA1.Create();  //HMACSHA  签名生成算法
            m.Key = Encoding.UTF8.GetBytes(SK);  //Encoding 编码  GetBytes 获取字节
            byte[] signData = Encoding.UTF8.GetBytes(signStr);
            byte[] finalData = m.ComputeHash(signData); //Compute Hash  算哈希值
            string signature = Convert.ToBase64String(finalData); //Convert 转换
            request.Headers["_api_signature"] = signature; //request 请求
            Console.WriteLine("\n\n签名结果:\n{0}", signature);//在屏幕上显示
我用代码转换器转成vb后如下:
   Dim m As HMAC = HMACSHA1.Create()  '存在错误
    m.Key = Encoding.UTF8.GetBytes(SK)
    Dim signData As Byte() = Encoding.UTF8.GetBytes(signStr)
    Dim finalData As Byte() = m.ComputeHash(signData)
    Dim signature As String = Convert.ToBase64String(finalData)
    request.Headers("_api_signature") = signature
    Console.WriteLine(vbLf & vbLf & "签名结果:" & vbLf & "{0}", signature)

执行时红色字体部分存在错误,请问该如何修改?谢谢!

 回到顶部
帅哥,在线噢!
有点蓝
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:107807 积分:548386 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2022/10/20 8:36:00 [只看该作者]

写全命名空间System.Security.Cryptography

Dim m As System.Security.Cryptography.HMAC = System.Security.Cryptography.HMACSHA1.Create()

 回到顶部