Question

ADODB.Recordset错误'800a0bcd'

BOF或EOF为True，或者当前记录已被删除。请求的操作需要当前记录。

/login/reset_form.asp，第8行。第8行是rs.MoveFirst

DIM mySQL, objRS, rs
mySQL = "SELECT * FROM medacist_user WHERE username = '" & strUsername & "'"
Set objRS = Server.CreateObject("ADODB.Connection")
objRS.Open  "Provider=MSDASQL.1;Password=****;Persist Security Info=True;User ID=****;Data Source=****"
Set rs = objRS.Execute(mySQL)

rs.MoveFirst
rs("Password") = Request.Form("Password")
rs("DateLastUpdated") = Date()
rs.Update

objRS.Close
Set objRS = Nothing

Response.Write "<div align='center'>" & strUsername & ",<br>"
Response.Write " Your password has been succesffully updated in our database.<br><br>"

objRS.Close
Set objRS = Nothing
objCONN.Close
Set objCONN = Nothing

Answer 1

如果您要更新记录，则不需要记录集，因为您不需要显示任何数据。只需使用更新查询，例如

mySQL = "UPDATE medacist_user set Password = "& Request.Form("Password") &", Date = "& Date() & " WHERE username = '" & strUsername & "'"
objRS.Execute(mySQL)

如果您还没有这样做，那么您需要考虑阻止两个或更多用户使用相同的用户名

ADODB.Recordset错误'800a0bcd'经典ASP

1 个答案: