最近在做一个程序,要使用update更新access数据库,然后重新打开,以更新显示,但发现进行一次更新不能把有的数据更新到数据库里,所以,我想是不是程序运行的太快数据没有更新到库里,高手都来看压呀,代码如下:for i:=1 to 49 do
begin
with form3.adoquery9 do//更新专用的adoquery
begin
close;
sql.Clear;
SQL.Add('update 后屏过热器热力计算 set sz = '+floattostr(myarray[i])+' where fh = '+quotedstr(myarray1[i]));//更新数据,不用管是什么东西
ExecSQL;
end;
end;
with form3.ADOQuery11 do//显示专用adoquery
begin
close;
open;
end;
begin
with form3.adoquery9 do//更新专用的adoquery
begin
close;
sql.Clear;
SQL.Add('update 后屏过热器热力计算 set sz = '+floattostr(myarray[i])+' where fh = '+quotedstr(myarray1[i]));//更新数据,不用管是什么东西
ExecSQL;
end;
end;
with form3.ADOQuery11 do//显示专用adoquery
begin
close;
open;
end;
解决方案 »
免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货