将数据库的所有表导出为excel，Export只能导出已经加载的表？没有加载的表怎么导出呢？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

将数据库的所有表导出为excel，Export只能导出已经加载的表？没有加载的表怎么导出呢？

当前代码如下：

Dim ex As New Exporter

Dim lst As List(Of String)

lst = Connections("12+3").GetTableNames

For Each nm As String In lst

Output.Show(nm)

ex.SourceTableName = nm '指定导出表

ex.FilePath = "D:\SQL_Backup\" & nm & ".xls" '指定目标文件

ex.Format = "Excel" '导出格式为Excel

ex.Export() '开始导出

导出为mdb数据库

然后再导入的时候会不会覆盖之前的数据呢？

同样是多个地区导出为mdb数据库，要把这些数据库汇总在一起

老师我想实现导入汇总怎么操作呢？

是直接执行代码Importer导入操作么？

Dim lst As List(Of String)

lst = Connections("12+3").GetTableNames

For Each nm As String In lst

Output.Show(nm)

If DataTables.Contains(nm) = False Then

DataTables.Load(nm)'加载订单表,

End If

老师动态加载表是不是这样呢？我操作了之后没有实际加载进来……

如果采用：

Dim lst As List(Of String)

lst = Connections("12+3").GetTableNames

Dim q As new OuterTableBuilder

For Each nm As String In lst

'Output.Show(nm)

If DataTables.Contains(nm) = False Then

q.TableName = nm

q.TableCaption = nm

q.C

q.Sele ctString = "Sel ect * From {"& nm & "}"

q.Build

End If

可以加载大部分表，少量表提示如下错误：

---------------------------

错误

---------------------------

加载表"回复函"失败，详细错误信息:

System.InvalidOperationException: 对于不返回任何键列信息的 SelectCommand，不支持 UpdateCommand 的动态 SQL 生成。

---------------------------

确定

---------------------------

[此贴子已经被作者于2023/2/14 11:12:24编辑过]

主题：将数据库的所有表导出为excel，Export只能导出已经加载的表？没有加载的表怎么导出呢？