DELPHI盒子
!实时搜索: 盒子论坛 | 注册用户 | 修改信息 | 退出
检举帖 | 全文检索 | 关闭广告 | 捐赠
技术论坛
 用户名
 密  码
自动登陆(30天有效)
忘了密码
≡技术区≡
DELPHI技术
lazarus/fpc/Free Pascal
移动应用开发
Web应用开发
数据库专区
报表专区
网络通讯
开源项目
论坛精华贴
≡发布区≡
发布代码
发布控件
文档资料
经典工具
≡事务区≡
网站意见
盒子之家
招聘应聘
信息交换
论坛信息
最新加入: eyang11
今日帖子: 7
在线用户: 19
导航: 论坛 -> 移动应用开发 斑竹:flyers,iamdream  
作者:
男 huffmanlepand (Delphi爱好者) ★☆☆☆☆ -
普通会员
2011/6/24 11:41:07
标题:
一个简单的算法 帮忙转下Delhpi 的 谢谢各位 大侠了 ! 浏览:2512
加入我的收藏
楼主:  private string sign(string urlPath, Dictionary paramDic)
        {
          byte[] signatureKey = Encoding.ASCII.GetBytes("50001");
          List list = new List();
          foreach (KeyValuePair kv in paramDic)
          {
          list.Add(kv.Key + kv.Value);
          }
          list.Sort();
          string tmp = urlPath;
          foreach (string kvstr in list)
          {
          tmp = tmp + kvstr;
          }

          //HMAC-SHA1
          HMACSHA1 hmacsha1 = new HMACSHA1(signatureKey);
          hmacsha1.ComputeHash(Encoding.ASCII.GetBytes(tmp));
          /*
          hmacsha1.ComputeHash(Encoding.ASCII.GetBytes(urlPath));
          foreach (string kvstr in list)
          {
          hmacsha1.ComputeHash(Encoding.ASCII.GetBytes(kvstr));
          }
          */
          byte[] hash = hmacsha1.Hash;
          //TO HEX
          return BitConverter.ToString(hash).Replace("-", string.Empty).ToUpper();
        }
----------------------------------------------
~·~·~·~·~·~·~·~·~·~··
 我爱Delphi!不过马上就要要用C++Builder!
~·~·~·~·~·~·~·~·~·~··
信息
登陆以后才能回复
Copyright © 2CCC.Com 盒子论坛 v3.0.1 版权所有 页面执行117.1875毫秒 RSS