58问答库 > 从foxpro的大数据量（超过12万条）DBF导出到Excel的问题，我想没5000条数据导出一个EX

从foxpro的大数据量（超过12万条）DBF导出到Excel的问题，我想没5000条数据导出一个EX

2024-11-20 19:22:19

推荐回答（3个）

回答（1）：

假设你的大数据量表取名“信息表”，如下程序将可以帮助你将它按要求导出。
use 信息表
count to 记录数
首记录=1
for t=1 to ceiling(记录数/5000)
if t*5000>记录数
末记录=记录数
else
末记录=t*5000
endif
表名=iif(t<10,"0"+allt(str(t))+".xls",allt(str(t))+".xls")
copy to &表名 xls for recn()>=首记录.and.recn()<=末记录
首记录=末记录+1
endf
如果你对命令不熟悉，建议你直接用复制加粘贴的办法来创建这个程序文件，运行后就可以在你的默认目录下生成你所需要的全部Excel表文件了。

回答（2）：

select * from sourceTab into cursor tmpS order by yourKeyField
pgCount = CEILING(RECCOUNT('tmpS')/5000)
cnt = 1
DO while cnt <= pgCount
SELECT * FROM tmpS INTO CURSOR tmpI WHERE BETWEEN(RECNO().(cnt-1)*5000+1,cnt*5000)
COPY TO ('Data_'+ALLTRIM(STR(cnt))) xl5
cnt = cnt +1
ENDFOR
USE IN tmpI
USE IN tmpS
USE IN sourceTab
*该程序没有经过调试，提供一个思路而已。

回答（3）：

你为什么不能用access呢？