本人菜鸟一只，请教一下各位高手！
    我现在有一个DBF表，表TEMP.dbf里大概有57600多条记录，我想按记录顺序把他拆分成58个DBF表！
例如：拆分出来的第一个DBF表名为TEMP1.dbf 里面的记录是TEMP.dbf内的1到1000条记录,拆分出来第二个表名为TEMP2.dbf 里面的记录是TEMP.dbf内的1001到2000条记录
最后一个temp58.dbf为最后的600多条记录，请高手赐教一下这个小程序如何写！感谢！！

上传原表

对不起 ，原表涉及一些保密的数据，几乎就是全保密的 ！能不能写个简单的程序帮我一下！多谢

SELECT 0
USE temp
FOR i=1 to 58
  COPY TO ('temp'+ALLTRIM(STR(i))+'.dbf') for RECNO()>(i-1)*1000 and RECNO()<=i*1000
ENDFOR

多谢  多谢！！