1

我有一个访问数据库,我正在尝试将所有表导出为CSV 格式,以便可以将它们导入 MySQL 数据库。

对 Visual Basic 的了解非常有限,并且设法找到了一个宏模块(在网上),它可以让我一次导出所有表。

Public Sub exportAllChangeDelim()

Dim obj As AccessObject, dbs As Object

Set dbs = Application.CurrentData
    For Each obj In dbs.AllTables
        If Left(obj.Name, 4) <> "MSys" Then
            DoCmd.TransferText acExportDelim, , obj.Name, obj.Name & ".csv", false
        End If
    Next obj
End Sub

有没有一种简单的方法可以更改默认字段分隔符,即:

"

例如自定义的东西:

{}

原因是我在尝试导出字段内的内容时遇到问题,因为它们有时包含语音标记,这会在导入 MySQL 时破坏字段计数。

为冗长的问题道歉!

4

0 回答 0