主题：[求助]导出项目数据时提示无效密码

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:导出项目数据时提示无效密码.zip

Dim q As new QueryBuilder
q.TableName = "aaa"
q.ConnectionName = "MicvyPM"
q.SelectString = "select * f rom {tbuser}"
q.Build
Dim ex As new Exporter
ex.SourceTableName = "aaa"
ex.FilePath = "C:\dc.accdb"
ex.Format = "Access2007"
ex.PassWord = "123"
ex.NewTableName = "aaa"
ex.Export

袍兄，这样恐怕不行哦，如果我有20个表都要导出，不能去建20个querybuilder呢。我的想法是用fill把这20个表数据分别填到aaa表中，然后exporter，但总提示无效密码

 汗，以前给你写过啊。

 

 只需要一个aaa表啊

看看这样有什么问题

下载信息  [文件大小：   下载次数： ]

点击浏览该文件:dcxm.txt

 QueryBuilder 写在循环里面去。

我附件中的代码问题在哪里呢

 

For Each dt As DataTable In DataTables
    If dt.Type = 3 And dt.Name <> "aaa" Then
        Dim q As new QueryBuilder
        q.TableName = "aaa"
        q.ConnectionName = "MicvyPM"
        q.SelectString = "select * f rom {" & dt.Name & "}"
        q.Build
        Dim ex As new Exporter
        ex.SourceTableName = "aaa"
        ex.FilePath = "D:\CS\SQL\a.accdb"
        ex.Format = "Access2007"
        ex.PassWord = "123"
        ex.NewTableName = dt.Name
        ex.Export
    End If
Next

袍兄，这样肯定不行的，因为第一个datatable时，就建了一个“aaa"表，导第二个表的时候，aaa表已经存在了，不可能再QueryBuilder