Visual FoxPro 6.0的数据导出

来源:百度知道 编辑:UC知道 时间:2024/06/21 18:36:59
我用Visual FoxPro 6.0数据库处理我厂数据,导出 Excel表格时,只能导出前两万条数据,我总共数据位5万多条, Excel表格可以导出6万多条来,请问是什么原因,如何解决。
请说明步骤,详细点。
如数据在增加到10万条以上,我如何导出数据 Excel表格请赐教。
如回答满意。可追加高分。

在 VFP6.0 中,用导出的方法,最大极限只能是两万条!哪怕是用 VFP9.0 也一样!
若用 VFP 的程序往里写,即所谓的〔用 VFP 控制 Excel〕,其方法最多也只能在
一张 Excel 的表中写入 2 的 16 次方条记录,即:65536 条!而且慢得让人无法忍受!
若用这个方法,十几万条估计费时不低於二十个小时!!!
就我所知较为快捷的方法是:手动去做,不一定是最好的哟,呵呵...
一,
USE YourTable
COPY ALL TO TmpCsv01 CSV FOR RECNO() <= 60000
COPY ALL TO TmpCsv02 CSV FOR RECNO() > 60000 AND RECNO() <= 120000
COPY ALL TO TmpCsv03 CSV FOR RECNO() > 120000

二,
再用 Excel 打开这三个文件,拷贝后粘贴在同一文件的三张表中!

只能这样,我们暂时还没有其它的方法来突破 Excel 的 2 的 16 次方的限制!

遇到这种情况我是逐记录写入到EXCEL的单元格上去。我手头电脑没有现成的例子,家里的倒有。不过我先发个相关的资料给你看看,如果不清楚的话,留言给我,我发具体的代码给你。

VFP控制EXCEL的语法如下:

myexcel=createobject('excel.application')
&&创建一个对象
myexcel.visible=.t.&&可见
&&bookexcel=myexcel.workbooks.add
bookexcel=myexcel.workbooks.open("C:\Documents and Settings\Administrator\桌面\学习\dd.xls")
&&打开指定文件
nrows=bookexcel.worksheets('sheet1')&&打开工作表