vfp中将EXCEL转换成XML文件能实现吗?望高手赐教 - 编程论坛

sdta2019-06-24 18:43

VFP9可以将临时表中的数据转换为XML格式的数据，示例如下

CREATE CURSOR tt (bh c(10), xm c(10), xb c(2))
INSERT INTO tt VALUES ("0001","aaaaa","男")
INSERT INTO tt VALUES ("0002","aaaab","男")
INSERT INTO tt VALUES ("0003","aaaac","男")
INSERT INTO tt VALUES ("0004","aaaad","男")
CURSORTOXML("tt", "myxml.xml", 1, 512, 0)

厨师王德榜2019-06-25 11:19

有两个思路，一个是Excel本身可以另存为XML，参考vba代码：
ActiveWorkbook.SaveAs Filename:= _
"C:\OpenSchema定义.xml", FileFormat:= _
xlXMLSpreadsheet, ReadOnlyRecommended:=False, CreateBackup:=False
有了这个，用OLE对象操纵Excel另存即可。

另一个思路，是先把Excel读到Cursor（具体方法不写了，坛子里有很多了）
然后用VFP（好像要9.0以上才支持这个）CURSORTOXML(参数自己查询一下帮助文件)，即可生成Xml格式。