Question

vfp记录移动

怎么样把DBF中的最后一条记录移到第一条记录?也就是说把第一条与最后一条交换.

Answer 1

如果你的意思是在程序里面实现滚动,请按以下方法

加入一段代码

*往下移动判断代码
if eof() &&没有索引时recn()=recc()也可以
go top
else
skip
endif
*往上移动判断代码
if bof() &&或者没有索引时recn()=1也可以
go bott
else
skip -1
endif

Answer 2

DIMENSION abc(X) ** X 为字段个数
go bottom
copy to array abc
go 1
append blank before
go 1
append from array abc
go 2
copy to array abc
delete
go bottom
append from array abc