主题：foxtable 多个表批量导出为excel

在foxtable一个项目中，有多个表，现在我想把这些表全部导出为excel格式，却只能一个一个表的导出，请问有没有办法想易表一样， 我只需要导出一次，就可以把这些表全部导出。

我在输入窗口输入如下代码：

For Each tb As DataTable In DataTables
Next
tb.export()

 

 

 

报错，未声明名称“tb"是什么意思？我明明声明了呀？

此主题相关图片如下：125.jpg

我在命令窗口输入如下代码 ：

Dim tbx As Table
For Each tbx In Tables
Dim ex As New Exporter
ex.SourceTableName = "tbx" '指定导出表
ex.FilePath = "c:\Data\tbx.xls" '指定目标文件
ex.Format = "Excel" '导出格式为Excel
ex.Fields = "日期,客户,数量,单价" '指定导出字段
ex.Filter = "[产品] = 'PD01'" '指定导出条件
ex.Export() '开始导出
Next

 

 

结果还是报错“不在在名称为tbx 的datatable" ,我实在想不起来我错那儿了，请高手明示。在此先谢谢了。附件上传的分别为项目文件和报错抓图。

 

谢谢

czy

，我终于明白了，变量不能用双引号引起来，而且 少了一个name.  ex.SourceTableName = tbx.Name .非常感谢。