G
garyye
Unregistered / Unconfirmed
GUEST, unregistred user!
我用的是D7，需要从本地的ACCESS数据库读取数据。
当数据库中剩下最后一条记录时。
程序报错。
bof 或eof中有一个是”真“或者当前的纪录已被删除，，，，，，
在网上查过这方面的问题。都说是ADO的BUG。但说的只是D5。我用的是D7，还有这个BUG吗？
在网上找来ADO UPDATE 2 。根本装不了。只有D5才能装上。
以下是部分代码。
ADOQuery.SQL.Text := 'select * from members where reged = False Order by id';
ADOQuery.Open;
if not(ADOQuery.Bof = True and ADOQuery.Eof = True) then
begin
RandNum := 5;//Random(1200)+76;
Timer_reg.Interval := RandNum * 1000;
Timer_reg.Enabled := True;
Minute := Trunc(RandNum/60);
second := RandNum mod 60;
RegUserStr := ADOQuery.Recordset.Fields.Item[1].Value; //出错位置！！
希望得到帮助。谢谢。
当数据库中剩下最后一条记录时。
程序报错。
bof 或eof中有一个是”真“或者当前的纪录已被删除，，，，，，
在网上查过这方面的问题。都说是ADO的BUG。但说的只是D5。我用的是D7，还有这个BUG吗？
在网上找来ADO UPDATE 2 。根本装不了。只有D5才能装上。
以下是部分代码。
ADOQuery.SQL.Text := 'select * from members where reged = False Order by id';
ADOQuery.Open;
if not(ADOQuery.Bof = True and ADOQuery.Eof = True) then
begin
RandNum := 5;//Random(1200)+76;
Timer_reg.Interval := RandNum * 1000;
Timer_reg.Enabled := True;
Minute := Trunc(RandNum/60);
second := RandNum mod 60;
RegUserStr := ADOQuery.Recordset.Fields.Item[1].Value; //出错位置！！
希望得到帮助。谢谢。
]
]