读书人

添加记录时出现这样的异常提示

发布时间: 2012-03-04 11:13:34 作者: rapoo

添加记录时出现这样的错误提示
ADODB.Recordset 错误 '800a0cb3 '

当前记录集不支持更新。这可能是提供程序的限制,也可能是选定锁定类型的限制。

/User/Save.asp,行61

代码:
Dim Sql,Rs
Set Rs=Server.CreateObject( "ADODB.RecordSet ")
Sql= "Select Top 1 * From User Where UserName= ' "&UserName& " ' "
Rs.Open Sql,Conn,1,3
If Not(Rs.Eof And Rs.Bof) Then
Rs.Close:Set Rs=Nothing
Response.Write( " <script> alert( '\n已存在相同的帐户. ');window.history.back(); </script> ")
Response.End
End If
Rs.AddNew '这是第61行
Rs( "UserName ")=UserName
Rs( "BY_Pwd ")=md5(Pwd1,32)
Rs( "Question ")=Question
Rs( "Answer ")=Md5(Answer,32)
Rs.Update
Rs.Close
Set Rs=Nothing
请问是什么原因?数据库是ACCESS的。

[解决办法]
Rs.AddNew之前加rs.edit试试
[解决办法]
看一下你数据库所在目录的权限设置,是否受权验IUSER_xxx
[解决办法]
Sql= "Select Top 1 * From [User] Where [UserName]= ' "&UserName& " ' "

......
Rs.Open Sql,Conn,2,3
[解决办法]
Rs.Open Sql,Conn,1,3

-->

Rs.Open Sql,Conn,3,3
[解决办法]
检查一下,是否有主键

读书人网 >Access

热点推荐