Dbf文件转换为Excel的方法
近期常有人问DBF如何转Excel,今做了个表单可解决这一问题。要求VFP9环境,比较完整的Excel(支持VBA)。可根据Excel的版本,导出多记录文件。当记录超过Sheet的上限,自动导入到下一个表,可防止字符串前面的0丢失。防止身份证等长字符串变成小数。可选择导出的字段。只在I5、Win10、Excel2016上测试过。1500000条记录、300M文件测试过,速度不快5分钟。
Dbf2XLSx.rar
(7.53 KB)
VBA中的
.TextFileColumnDataTypes = Array(2, 2, 1, 1, 2,9, 1)
不知VFP如何调用,如能解决,程序效率将更高。
dbf2xls.zip
(7.65 KB)
如果没有非法汉字(半个汉字)可以用以下命令。可导出备注字段。
CURSORTOXML("已经打开的表别名或工作区名","XML文件名.xml", 3, 512+16,记录数,"XSD文件名")
说明:1、XML与XSD名可以任意,建议与表同名。
2、记录数说明
0——复制所有记录
其它——从当前记录开始的记录数。
记录数最大数Excel2003及以前为2^16-1,2007及以后2^20-1 (-1是标题行。)
指定数大于实际记录数,按实际数复制。
[此贴子已经被作者于2021-9-2 14:00编辑过]