level 1
闲落_不是熊
楼主
我这个是修改密码的代码,但是运行的时候总是说旧密码错误(我输入没错)
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from users where 用户名='+quotedstr(FrmLogin.EdtUsrName.text));
adoquery1.Open;
if adoquery1.FieldValues['口令']=edit1.Text then
begin
if Edit2.Text=Edit3.Text then
begin
with adoquery1 do
begin
edit;
adoquery1.FieldValues['口令']:=edit2.Text;
adoquery1.post;
refresh;
showmessage('口令修改成功');
end;
end
else
begin
showmessage('两次口令输入不一样!');
end;
end
else
showmessage('旧口令错误,请重新输入');
2014年12月02日 07点12分
1
adoquery1.SQL.Clear;
adoquery1.SQL.Add('select * from users where 用户名='+quotedstr(FrmLogin.EdtUsrName.text));
adoquery1.Open;
if adoquery1.FieldValues['口令']=edit1.Text then
begin
if Edit2.Text=Edit3.Text then
begin
with adoquery1 do
begin
edit;
adoquery1.FieldValues['口令']:=edit2.Text;
adoquery1.post;
refresh;
showmessage('口令修改成功');
end;
end
else
begin
showmessage('两次口令输入不一样!');
end;
end
else
showmessage('旧口令错误,请重新输入');