MSAccess - dbSeeChanges错误?

时间:2016-11-17 14:14:32

标签: ms-access access-vba

我有一个数据库,直到今天早上一直运作良好。当我尝试将远程表的内容复制到本地后端时,出现错误:"错误3622 - 您必须使用dbSeeChanges选项..."

远程表位于服务器上,并且具有自动编号属性。后端表是一个简单的只读/静态快照,它不关心自动编号数据类型,只是简单地定义为数字 - 我只需要表(快照)是本地的,以解决性能问题。

我添加了dbSeeChanges变量但未成功 - 抱怨"参数太少"在db.execute行(下面)。

以下是我的数据库中的一些细节:

Dim db As Database
dim strSQL as string
Set db = CurrentDb()

strSQL = "INSERT INTO Item " & _
    "SELECT dbo_Item.* " & _
    "FROM dbo_Item " & _
    "WHERE dbo_Item.MASTER_INVID=  " & TempVars!my_InvID

    db.Execute strSQL, dbFailOnError + dbSeeChanges

我错过了什么?任何避免/纠正的建议。

1 个答案:

答案 0 :(得分:1)

另一种方法是制作链接表的副本,然后将其转换为本地表:

localTableName = "Item"
DoCmd.CopyObject , localTableName , acTable, "dbo_Item"
DoCmd.SelectObject acTable, localTableName , True
RunCommand acCmdConvertLinkedTableToLocal