就是这段
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select * from dlb.db');
Query1.SQL.Add('where code=:code');
Query1.ParamByName('code').AsString:=ecode.Text ;
Query1.open; if Query1.RecordCount=0 then
ShowMessage('the code is wrong');
if Query1.FieldByName('pass').AsString <> epass.Text then
ShowMessage('then pass is wrong');
if npass.Text <> rnpass.Text then
showmessage ('两次输的的新密码不一致');
Query1.Close; Query1.SQL.Clear;
Query1.SQL.Add('update dlb.db set pass=:pass');
Query1.ParamByName('pass').AsString:=npass.Text;
Query1.ExecSQL;
Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add('select * from dlb.db');
Query1.SQL.Add('where code=:code');
Query1.ParamByName('code').AsString:=ecode.Text ;
Query1.open; if Query1.RecordCount=0 then
ShowMessage('the code is wrong');
if Query1.FieldByName('pass').AsString <> epass.Text then
ShowMessage('then pass is wrong');
if npass.Text <> rnpass.Text then
showmessage ('两次输的的新密码不一致');
Query1.Close; Query1.SQL.Clear;
Query1.SQL.Add('update dlb.db set pass=:pass');
Query1.ParamByName('pass').AsString:=npass.Text;
Query1.ExecSQL;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货