求破解工具。(100分)

  • 主题发起人 主题发起人 RedBeret
  • 开始时间 开始时间
R

RedBeret

Unregistered / Unconfirmed
GUEST, unregistred user!
一个ACCESS数据库,在工作组文件.mdw中设置了用户名和密码,现在只记得用户名,
密码不记得了,在网上找了一堆破解工具,可是都是DEMO版(不是注册的那种),只
能显示2、3位密码,有什么办法能找回我的密码?或者哪位大虾能给我一个正式版的
破解工具。谢谢了!
 
现在网上正清理,破解工具不好找呀
 
记得前面几期的杂志上有一篇如何编程取出access密码的文章。大概是电脑爱好者,你找找看。
 
删除组文件试一下
最好先备份一下
 
http://www.delphibbs.com/delphibbs/dispq.asp?lid=529552
 
unit Unit1;

interface

uses
Windows, Messages,SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;

type
TForm1 = class(TForm)
passedit: TEdit;
Button1: TButton;
OpenDialog1: TOpenDialog;
Chk2000: TCheckBox;
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;

var
Form1: TForm1;

implementation

{$R *.DFM}
procedure TForm1.Button1Click(Sender: TObject);
const
xorString:array[0..12]of byte=
( $86, $FB, $EC, $37,
$5D, $44, $9C, $FA,
$C6, $5E, $28, $E6,$13 );
xorString2:array[0..20]of byte=
( $D3, $EC, $08, $9C,
$93, $28, $46, $8A,
$01, $7B, $A0, $DF,
$22, $13, $9A, $B1,
$61, $79, $C7, $7C,$5B);


var
passBuf:array[0..14]of byte;
pass:array[0..14]of char;
passBuf2:array[0..40]of byte;
pass2:array[0..20]of char;
B:Byte;
F:TFileStream;
I,j:integer;
begin
if opendialog1.execute then begin
if not FileExists(opendialog1.filename) then
begin
Showmessage('文件不存在,或一般错误.');
Application.Terminate;
exit;
end;
F:=TFileStream.Create(opendialog1.filename,fmShareDenyNone);
if NOT chk2000.Checked then
try
F.Seek($42,soFromBeginning);
F.Read(passBuf,14);
for I:=0 to 13 do
begin
B := passBuf xor xorString;
pass:=char(B);
end;
pass[sizeof(pass) - 1] := #0;
passEdit.Text:=StrPas(Pass);
finally
F.Free;
end else
try
F.Seek($42,soFromBeginning);
F.Read(passBuf2,40);
I:=0;j:=0;
while I<40 do
begin
B := passBuf2 xor xorString2[j];
pass2[j]:=char(B);
inc(i,2);inc(j);
end;
pass2[sizeof(pass2) - 1] := #0;
passEdit.Text:=StrPas(Pass2);
finally
f.Free;
end;

end;
end;



end.//试试.
 
TO:妄语
我删了工作组文件也不行。

TO:hbezwwl
你这段程序是解ACCESS数据库密码的,我要的是解工作组中的用户密码。
 
别再费功夫了,system.mdw也是access数据库文件,用access打开,其中有个表记录了用户名
及其密码(加密了的),谁都可以读,要是可破解,早就有破解软件了,所以:

工作组文件system.mdw中的密码无解!

把分给我吧![:D]
 
网上很多吧
 
或者哪位大虾给我一份“System Password Tools 3.0”正式版,或者“Access Key”的
正式版, 我有上述两个软件的DEMO版,但是只能解三位密码,如果哪位有正式版的话,
我给他1000分。
 
我有一个解ACCESS密码的东东,好象是叫ACCESS KEY,不过现在没在手底下,我给你找找吧
 
TO:左右手
是不是正式版的?DEMO版只能解3位呀。
 
我有一个解ACCESS密码的东东,好象是叫ACCESS KEY,不过现在没在手底下,我给你找找吧
 
好象是正式版的,我回去找找看
 
我发给你,但地址?
 
能将Access文件发给我看看吗?呵呵,对这个加密还是不是特别清楚的。
刚才实验了一下,一台计算机上需要密码,拿到另外一台上面竟然没有了,呵呵。
yzhshi@371.net,最好小一些。否则炸了俺的邮箱俺要伤心的[:D][:(]
 
TO:emonster
我的MAIL是zh318@163.com,谢谢。

TO:yzhshi
数据库太大了,有一、二百M哩,发不了。
 
呀呀,俺的信箱才5M呀,呵呵,那么能不能做一个100多K的发给我呢?
我的自己实验了加密码,但是没有太弄懂,也许是Access的Bug,也许是自己不会。
不过当初的VSS的密码就是可以使用替换文件的方式搞定。
 
如果是Access97创建的.mdb可以直接找一个没有口令的.mdb文件的头(文件的开始几百字节)
替换一下就把口令清除了。如果文件大,可以用Access创建两个新库,一个加口令后,用
UltraEdit之类的软件比较编辑一下就可以。
如果是用Access2000创建的.mdb好像就解不开了.
 
TO:yzhshi
我是想提取工作组文件.mdw中的用户名和密码,不关数据库文件.mdb的事。
 
后退
顶部