Dm.ADO_jilu_Query.Post;
with DM.ADO_jilu_Query do
begin
Close ;
SQL.Clear ;
SQL.Add ('update a set a.kehu_bm=b.kehu_no from kehu_dj a,kehu b ');
SQL.add('where a.kehu_mc=b.kehu_mc');
Open ;
end;
with DM.ADO_jilu_Query do
begin
Close ;
SQL.Clear ;
SQL.Add ('update a set a.kehu_bm=b.kehu_no from kehu_dj a,kehu b ');
SQL.add('where a.kehu_mc=b.kehu_mc');
Open ;
end;
where a.kehu_mc=b.kehu_mc
where a.kehu_mc=b.kehu_mc
begin
Close ;
SQL.Clear ;
SQL.Add ('update kehu_dj as a set a.kehu_bm=b.kehu_no from kehu as b');
SQL.add('where a.kehu_mc=b.kehu_mc');
exesql;
end;