我在程序中利用Query修改了密码。而且我再次运行程序时密码也确实修改了,可是我用Access打开该表时,密码还是原值,根本没有修改!

解决方案 »

  1.   

    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 where ...');
      Query1.ParamByName('pass').AsString:=npass.Text;
      Query1.ExecSQL;
      

  2.   

    query1.refrash;
    or 
    query1.close;
    query1.open;
      

  3.   

    query1.refresh是不起作用的,query1.close;query1.open才可以