adoquery 用法

实例.。
 参照修改肯定没问题


                                           with    adoquery2   do
                                                  begin
                                                       close;
                                                       sql.clear;
                                                       sql.Add('update   yewu');
                                                       sql.add('set  复核=''Y'',复核人=:fhr');
                                                       parameters.parambyname('fhr').value:=trim(form57.edit1.Text);
                                                       sql.add('where   编码=:bmm');
                                                       parameters.parambyname('bmm').value:=trim(edit1.Text);
                                                       execsql;
                                                  end;

                                           //修改fenda表中的复核标志为Y
                                           with    adoquery2   do
                                                  begin
                                                       close;
                                                       sql.clear;
                                                       sql.Add('update   fenfa');
                                                       sql.add('set  复核=''Y''');
                                                       sql.add('where   编码=:bmm');
                                                       parameters.parambyname('bmm').value:=trim(edit1.Text);
                                                       execsql;
                                                 end;