主题：请问导出

1、表格在foxtable里面生成了没有？

2、加入msgbox，能否执行到exporter的代码？

3、如果1、2都没有问题，做个例子发上来看看。

我测试这段代码没问题，你也先测试一次

Dim q As new OuterTableBuilder
q.TableName = "test"
'q.connectionName = "abc"
q.SelectString = "Select * From {表A}"
q.Build

Dim ex As New Exporter
ex.SourceTableName = "test" '指定导出表
ex.FilePath = ProjectPath & "\系统文件\" & "mgsmodel" & ".accdb" '指定目标文件
ex.Format = "Access2007" '导出格式为Access 2007
ex.PassWord = "128"
ex.Export() '开始导出

我测试没问题，请认认真真测试。

目前没有办法，不提供对应的方法。

下是引用hbhb在2018/4/3 16:44:00的发言：
千万次测试也没用，您把您测试的东东给我看看，我就不信了，代码一个字不差，就不行？

删除本来的 mgsmodel.accdb 文件，再测试一次，即可。没问题的。