DELPHI .NET MD5 东东 一个简单软件的算法
.NET 程序破解目前比较容易(扰码不深的话)Reflector 载入 自己看吧!~
.NET MD5 算法!~
以下是注册机部分源码!~
function TWinForm.GetMD5String(origin: string): string;
var
num1: Byte;
provider1:MD5CryptoServiceProvider;
buffer1:array of Byte;
builder1 :StringBuilder;
begin
provider1 := MD5CryptoServiceProvider.Create;
buffer1 := Encoding.UTF8.GetBytes(origin);
buffer1 := provider1.ComputeHash(buffer1);
builder1 := StringBuilder.Create;
for num1 in buffer1 do
begin
builder1.Append(num1.ToString('x2').ToUpper)
end;
begin
Result := builder1.ToString;
exit
end
end;
procedure TWinForm.Button1_Click(sender: System.Object; e: System.EventArgs);
var
Text1:string;
begin
text1 := GetMD5String(TextBox1.Text+ '1001JINHU');
TextBox2.Text:=text1;
end;
我喜欢DELPHI 但是非常不愿意用DELPHI .NET 写程序 怕怕 ~
[ 本帖最后由 ww-jack 于 2006-11-18 17:34 编辑 ] 主要是要介绍找这个地方方法与思路,谢谢
页:
[1]