var md5: TIdHashMessageDigest5; md5 := TIdHashMessageDigest5.Create; //Base64Encode
// result := ' /START QQUIN:' + QQNum + ' PWDHASH:' + Base64(TempChar(md5.HashValue(QQPw))) + ' /STAT:' + IntToStr(QQState);
result := ' /START QQUIN:' + QQNum + ' PWDHASH:' + Base64Encode(TempChar(md5.HashValue(QQPw))) + ' /STAT:' + IntToStr(QQState);
// md5.Free;
md5.Free;
这里用了md5.hashvalue加了密。请问有法解么?有无代码
// result := ' /START QQUIN:' + QQNum + ' PWDHASH:' + Base64(TempChar(md5.HashValue(QQPw))) + ' /STAT:' + IntToStr(QQState);
result := ' /START QQUIN:' + QQNum + ' PWDHASH:' + Base64Encode(TempChar(md5.HashValue(QQPw))) + ' /STAT:' + IntToStr(QQState);
// md5.Free;
md5.Free;
这里用了md5.hashvalue加了密。请问有法解么?有无代码
不知为什么会这样。。
Base64Encode加密字符串后。用解密函数得出的是正确的字符串。
但是解上面 Base64Encode(TempChar(md5.HashValue(QQPw))) 出来的是乱码!!!!
可以去反查md5的网站去查,内容简单的话很可能会被查到