实时异常 '2147467259 (80004005)' 查询过于复杂

2013-01-06

实时错误 '-2147467259 (80004005)': 查询过于复杂。Private Sub Command6_Click()订单修改If A

实时错误 '-2147467259 (80004005)': 查询过于复杂。
Private Sub Command6_Click()            '订单修改
        If AdoData.State > 0 Then AdoData.Close             'Rx
        AdoData.Open "Select * From Rx where JOB='" & Text1.Text & "'", db, adOpenStatic, adLockOptimistic
        AdoData.Fields("CF") = UCase(Text44.Text)
        AdoData.Update
        AdoData.Close
End Sub

代码如上

调试的时候出现  实时错误 '-2147467259 (80004005)': 查询过于复杂。的提示，怎么回事？

代码本来很长，但是我把其他的删了，就留1句写入语句，还是提示这个错误。

执行的顺序是这样的：我先写入数据（写入的数据比较多，但这时候没问题）。然后我进行查询，找到了刚写入的那条记录，然后我再进行修改，就出现上面的错误提示。点击调试按钮，定位在AdoData.Update

[解决办法]
这得看你Text1.Text里面的东西啦.
自己在这一句设个断点看看最后的sql语句到底是什么吧
[解决办法]
update Rx set CF='" & UCase(Text44.Text) & "' where JOB='" & Text1.Text & "'"

换这个sql

热点排行

VB

实时异常 '2147467259 (80004005)' 查询过于复杂