当前位置：
|
主题：[求助]当前记录集不支持更新。这可能是提供程序的限制，也可能是选定锁定类型的限制。（已解决，希望对大家有帮助） [收藏主题] | 转到： |
 ADODB.Recordset 错误 '800a0cb3' 当前记录集不支持更新。这可能是提供程序的限制，也可能是选定锁定类型的限制。
/plus/search/index.asp，行 245 这个怎么办？求高手 |
|
 支持(0) |  反对(0)
 顶端  底部
|
![电子邮件:[ foxsc@126.com ]](http://bbs.kesion.com/club/images/email.gif){kind=small}
|
Sub KeyToDataBase()
If KS.IsNul(Trim(Key)) or CurrPage>1 Then Exit Sub Dim RS:Set RS=Server.CreateObject("adodb.recordset") RS.Open "Select top 1 * From KS_KeyWords Where IsSearch=1 and KeyText='" & Key &"'",conn,3,3 If RS.Eof Then RS.AddNew RS("AddDate")=Now RS("IsSearch")=1 RS("KeyText")=Key RS("Hits")=1 End If RS("Hits")=RS("Hits")+1 RS("LastUseTime")=Now RS.Update RS.Close:Set RS=Nothing End Sub |
|
|
支持(0) | 反对(0)
顶端 底部
|
|
支持(0) | 反对(0)
顶端 底部
|
|
支持(0) | 反对(0)
顶端 底部
|
|
RS.Open "Select top 1 * From KS_KeyWords Where IsSearch=1 and KeyText='" & Key &"'",conn,3,3 把红色部分去掉就可以，呵呵 百度了好久 |
|
|
支持(0) | 反对(0)
顶端 底部
|
| ＜上一主题 | 下一主题 ＞ |