我在调用ADO UPDATE方法的经典ASP类中有以下子例程。我使用ODBC驱动程序5.1使用mySQL数据库。
如果我所有的子程序都会出现以下错误:
Microsoft Cursor Engine错误'80004005' 键列信息不足或不正确。更新会影响太多行。
Public Sub Update(table,id_field,id,fields,values)
Dim yy
Dim strQuery
Dim strFields
Const adOpenDynamic = 2
Const adLockOptimistic = 3
Const adCmdText = 1
strQuery = ""
For yy = LBound(fields) to UBound(fields)
strQuery = strQuery & fields(yy) & ", "
Next
strQuery = Left(strQuery, Len(strQuery) - 2)
strQuery = "select " & strQuery & " from " & table & " where " & id_field & "=" & id
i_objRS.CursorLocation = 3
i_objRS.Open strQuery, i_objDataConn, adOpenDynamic, adLockOptimistic, adCmdText
For yy = 0 To UBound(fields)
i_objRS(fields(yy)) = values(yy)
Next
i_objRS.Update
i_objRS.Close
End Sub
我已经尝试更改了cursorlocation属性和open参数,但仍然无法使其工作。我正在更新的表有一个唯一的自动ID,这是主键。
答案 0 :(得分:0)
嗯。你需要通过ADO做到这一点吗?尝试对连接对象运行查询,看看会发生什么?
答案 1 :(得分:0)
诊断动态创建的SQL的第一件事是检查实际创建的SQL字符串。但是,使用动态游标执行更新并不是实现行更新的好方法。
改为使用ADODB.Command对象并创建Update命令。注意不要将值连接到创建的SQL命令中。而是使用参数位置标记(通常?但我不记得是否会改变我的DBengine(我不是mySQL身体))并将参数添加到ADODB.Command参数集合中。