adotable定位的问题
Rubi 2006-07-17 07:16:21 代码大致情况如下
adoTBotherData.Close;
adoTBotherData.Open;
adoTBotherData.Append;
adoTBotherData.FieldByName('scp').Value :=adoTBFtp.fieldbyname('ftpNo').AsString;
adoTBotherData.FieldByName('time').Value :=FormatDateTime('YYYY-MM-DD',Now());
adoTBotherData.FieldByName('maxtime').Value :=FormatDateTime('HH:MM',time);
adoTBotherData.Post;
adoTBOther.Close;
adoTBOther.Open;
while not adoTBOther.Eof do
begin
for j:=1 to 12 do
begin
...//循环计算,
end;
//adoTBotherData.Close;
//adoTBotherData.Open;
adoTBotherData.Locate(adoTBFtp.fieldbyname('ftpNo').AsString,adoTBotherData.fieldbyname('scp').AsString,[]);
//到这里,数据库中adotbftp插入了一条数据,这里就开始编辑,可是这里却提示什么更新无法定位
adoTBotherData.Edit;
...
adotbOtherData.post
adotbother.next;
end;
我的思路是先给数据库添加一条数据,然后再adotbOther要进行循环计算,然后在给那天记录进行更新,为什么执行到定位的时候有问题,如果不执行定位,数据始终都是在第一条纪录中进行操作,不能自动更新到下一个数据中去