奇怪的 ODBC 错误

Question

我将 Access 前端用于 Microsoft SQL 后端。

我面临的问题是我正在使用 adodb 连接插入数据。我在多种形式上使用它。在第一种形式上有效，在第二种形式上有效，在第三种形式上也有效。但在第四种形式中，我得到一个：“ODBC：调用失败”错误。

您可能认为我犯了某种打字错误，但这不是问题所在。当我从表格四开始时，我可以插入数据。 长话短说，在以不同形式插入 3 次后，我得到了 odbc 错误。我不知道问题是什么。

 Dim Query As String

Dim rs As ADODB.Recordset
Dim cn As ADODB.Connection
Set cn = New ADODB.Connection
Set rs = New ADODB.Recordset

Query = "SELECT MAX(ID) From dbo_Controle"
rs.Open Query, CurrentProject.Connection
rs.MoveFirst
ID = rs.Fields(0).Value
Query = "INSERT INTO dbo_Controle VALUES (" & ID + 1 & ",'" & Me.txtControleTime & "')"
Set cn = CurrentProject.Connection
Debug.Print (Query)
cn.Execute Query

rs.Close
cn.Close
Set rs = Nothing
Set db = Nothing

这是我在具有不同查询的不同表单上使用的代码。

Answer 1

我遇到了同样的问题，并且能够使用 CurrentProject.AccessConnection 解决它