delphi ACCESS数据库判断账号密码

if (tbl1.Locate('use',form1.Edit1.Text,[])) and (tbl1.Fields['pass'].AsString=form1.Edit2.Text) then

...

如果你只是忘了密码，可以直接用md5计算器之类的软件重算一个密码（或者直接用下面列出的），把加密后的结果填到你的access库里密码处，然后就可以直接用你的用户名和123456登陆了。

md5有32位和16位，一般也分大小写（注意一下你以前数据库里的密码的位数和大小写，在下面挑一个就行），以123456为例，以下

E10ADC3949BA59ABBE56E057F20F883E

e10adc3949ba59abbe56e057f20f883e

49BA59ABBE56E057

49ba59abbe56e057

最好用ado来 *** 作，先拖几个控件adoconnection,adoquery,datasource，然后把adoconnection连到你的access数据库，设置一个按钮做为保存，点击按钮后 *** 作如下

adoquery1.close

adoquery1.sql.clear

adoquery1.sql.add('insert into 你的表 (姓名,职业,年龄) values (:edit1.text,:edit2.text,:edit3.text)')

adoquery1.execsql

我没给你试代码，可能中间有的标符号不对，你自己上机调试一下，具体的思路就是这样的

---