求助：利用代码实现了遍历表然后全部导出为一个数据库现在怎么反过来进行恢复操作呢？怎么操作都没有成功 - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

For Each dt As DataTable In DataTables
    If dt.Type=1 OrElse dt.Type =3 Then
        output.show(dt.name)
        Dim ex As New Exporter
        ex.SourceTableName = dt.name '指定导出表
        ex.filepath = "c:\Data\订单.mdb" '指定目标文件
        ex.Export()
    End If
Next

示例二

如果希望出现一个打开文件对话框，导入用户指定的文件，可以参考下面的代码：

Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter= "Access文件|*.mdb" '设置筛选器
If dlg.ShowDialog = DialogResult.Ok Then '如果用户单击了确定按钮
    Dim ip As New Importer
    ip.SourcePath = dlg.FileName '指定数据文件
    ip.SourceTableName = "订单" '指定要导入的表
    ip.NewTableName ="订单" '导入后的表名
    ip.Import()
End If

主题：求助：利用代码实现了遍历表然后全部导出为一个数据库 现在怎么反过来进行恢复操作呢？怎么操作都没有成功

主题：求助：利用代码实现了遍历表然后全部导出为一个数据库现在怎么反过来进行恢复操作呢？怎么操作都没有成功