请教下，我有一个14760记录的表，我想按照每5000条记录，生成一个以记录数命名的dbf，比如A5000、A10000，代码应该怎么写啊？
我自己的思路是这个：

n=0
for i=1 to reccount()
n=i+5000
select * from A where recno() between  i and n into dbf  'Ai'

sele * from 表 where recn()<=5000 into dbf A5000

sele * from 表 where recn() betw 5001 and 10000 into dbf A10000

sele * from 表 where recn()>10000 into dbf A15000

还想再请教一下，如果我想按500条来分，在循环里做呢？

SELECT CTABNAME
N=5000 && 可以修改N的值，随便多少条记录生成一个表
FOR I=1 TO CEILING(RECCOUNT()/N) && 根据N值的不同，可以生成CEILING(RECCOUNT()/N)个表
    SELECT * FROM CTABNAME WHERE RECNO()>(I-1)*N AND RECNO()<=I*N INTO TABLE [A]+TRANSFORM(I*N)
ENDFOR

[ 本帖最后由 sdta 于 2013-7-9 09:52 编辑 ]