每次插入到最后?(50分)

  • 主题发起人 主题发起人 thj
  • 开始时间 开始时间
T

thj

Unregistered / Unconfirmed
GUEST, unregistred user!
我用ADO+ACCESS,使用Insert插入语句,想使每次插入数据都依次排到最后?(不用Append)
 
定义好索引就行了
 
将记录指针移到尾部,在进行插入(不要使用order by语句排序),肯定在最后了!
 
是呵
插入前先来句
adotabel1.last;
 
我怎么觉得ACCESS就只能插到最后啊?可以插到某个记录号后面吗?例如共十条
记录插到第三条后,行吗?
 
你可以使用bookmark,例
procedure TForm1.CopyDataClick(Sender: TObject);

var
SavePlace: TBookmark;
PrevValue: Variant;
begin
withTable1 do
begin
{ get a bookmark so that we can return to the same record }
SavePlace := GetBookmark;
try

{ move to prior record}

FindPrior;

{ get the value }

PrevValue := Fields[0].Value;

{Move back to the bookmark

this may not be the next record anymore
if something else is changing the dataset asynchronously }
GotoBookmark(SavePlace);
{ Set the value }
Fields[0].Value := PrevValue;
{ Free the bookmark }
finally
FreeBookmark(SavePlace);
end;
end;

end;
 
如果用sql语句执行,Acess默认插到最后。
 
后退
顶部