Delphi 中 adoquery1 实现怎么修改密码... ( 积分: 0 )

我用ACESS建了一个用户表 字段安排是这样的..
id 自动编号
username 文本
password 文本
我想建一个密码修改这个窗体....窗体安排是这样的
用户名:combobox1
旧密码:edit1
新密码:edit2
确认密码:edit3
我现在已经在窗体的初始化里面解决了username到combobox1了
怎么实现当提交确认修改时:判断旧密码是不是输错...以及怎么实现密码的更新修改...前提是只用一个adoquery1

怎么没有人回答啊.....555555````````

哈哈,,,俺搞定了......

sql写好就可以啦

if edit1.text<> fieldbyname('password').asstring then
begin
showmessage('密码不一致');
exit;
end;
if edit1.text<>edit2.text then
begin
showmessage('新密码和确认密码不一致！');
exit;
end
else begin
with adoquery1 do
begin
active:=fasle;
sql.text:='update tabelname set password='''+edit2.test+''' where id='' ';
excsql;
end;
end;