Error en codigo

[Biopepe]

Aupa:


Me sale este error:

ADODB.Fields error '800a0cc1'

ADO no encontró el objeto en la colección que corresponde con el nombre o referencia ordinal solicitada por la aplicación.

/crazyde/basedatos/Servidor/login.asp, line 15

en este código:

<%Response.buffer=true

set con=server.createobject ("ADODB.CONNECTION")
con.open "DRIVER={Microsoft Access Driver (*.mdb)};DBQ="& server.mappath("datos.mdb")

a=Request.form("uname")
b=Request.form("upass")

sql="SELECT nick from datos where nick='"&a&"'"
Set RS=con.execute(sql)
if RS.eof then
Response.Redirect "error.asp?errorcode=invaliduname"
end if
while not rs.eof
if b=RS("password") and a=RS("nick") then
Response.Cookies("status")="loggedin"
Response.Redirect "cuenta.asp"
else Response.redirect "error.asp?errorcode=invalidpass"
end if
rs.movenext
wend
rs.close
con.close
%>

¿Que está mal??
Gracias

[franrtorres77]

repasa los campos del formulario y los campos de la bd, mira a ver si estan bien

[maestro]

Supongo que la linea 13 sea esta
if b=RS("password") and a=RS("nick") then

Revisa el nombre de los campos de la base de datos a ver si se llaman asi.

[Biopepe]

Era un fallo en el formulario.

Gracias por la idea

Agur

[bakanzipp]

mejora tu sql...segun lo que veo estan trayendo todos los registros de tu tabla y el que coincida con tu user y pwd lo logueas...
haz mejor esto

Código:

a=Request.form("uname")
b=Request.form("upass")

sql="SELECT nick from datos where nick='"&a&"' and pasword='"&b&"'"
Set RS=con.execute(sql)
if RS.eof and RS.bof then
  Response.Redirect "error.asp?errorcode=invaliduname" 
else
   Response.Cookies("status")="loggedin"
   Response.Redirect "cuenta.asp"
end if

bueno con este code no sabes si erro el nick o el pwd pero te ahorras de recoger un recordset con todos los nick's

ademas en tu consulta solo rescatas el nick y masn adelante preguntas por el nick y el password

sql="SELECT nick from datos where nick='"&a&"'"


if b=RS("password") and a=RS("nick") then