我有一个访问数据库,我正在尝试将所有表导出为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 时破坏字段计数。
为冗长的问题道歉!