VB6:使用DoCmd.TransferText错误将CSV文件读入访问表

时间:2015-01-21 23:28:07

标签: csv import vb6

在VB6程序中,使用Access 2000数据库,我想将第一条记录中带有表字段名称的.CSV文件读入新的Access表。

这是我的VB6代码:

使用CreateObject(" Access.Application")       .OpenCurrentDatabase" C:\ Database1.accdb"       .DoCmd.TransferText ,, newTable,importFile,True       。放弃    

结束

DoCmd.TransferText命令给出了以下错误:

错误#3107(无法添加MSAccess:记录;表'没有插入权限。)

任何想法我做错了什么?

1 个答案:

答案 0 :(得分:0)

寻求澄清 - 您是否正在通过with打开的数据库中运行此.OpenCurrentDatabase块?如果是这样,我的理解是,调用是从另一个应用程序(MSDN)打开Access,因此您可能阻止自己编辑记录。如果此方案的假设为真,DoCmd.TransferText本身就足以导入记录。

为了将来的目的,请注意您可以通过单击“代码示例”图标或在编写提交时按Ctrl + K来插入更易读的代码。