Foros del Web » Programando para Internet » ASP Clásico »

Falla Login. ASP

Estas en el tema de Falla Login. ASP en el foro de ASP Clásico en Foros del Web. Hola tengo un problema y es que en mi pagina de login quiero hacer la coneccion directa a la base de access sin tener que ...
  #1 (permalink)  
Antiguo 19/02/2003, 11:34
Avatar de GUAPOBEN  
Fecha de Ingreso: noviembre-2002
Ubicación: Mexico DF
Mensajes: 204
Antigüedad: 21 años, 7 meses
Puntos: 1
Falla Login. ASP

Hola tengo un problema y es que en mi pagina de login quiero hacer la coneccion directa a la base de access sin tener que crear un DSN. y me manda el siguiente error:

Microsoft VBScript runtime error '800a01a8'

Object required: 'rs'

/skytel/login.asp, line 114

Mi codigo es:

<%else
usuario=replace(request.form("usuario"),"'","")
password=replace(request.form("password"),"'","")

strconn = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & Server.MapPath("procliente/bases/procliente.mdb")
set conn = Server.Createobject("adodb.connection")
conn.open strconn
sqltxt="Select * from usuarios where usuario='"&usuario&"' and password= '"&password&"'"
'response.write sqltxt
rs.Open sqltxt, conn
if not rs.eof then
' nos ha devuelto un registro, ahora miraremos si es valido
' con ello evitamos el ataque típico SQL
if rs("usuario")=usuario and rs("password")=password then
' si el usuario esta en la base de datos y la password coincide
session("autorizacion")=1
session("acceso") =rs("acceso")
response.redirect "/procliente/index.htm"
end if
else
session("autorizacion")=-1
end if
rs.close
set rs=nothing
conn.close
set conn=nothing
if session("autorizacion")=-1 or session("autorizacion")="" then
' no hemos encontrado el registro
' eso indica que el usuario y/o la password son erroneos
response.redirect "error.asp?msg=Usuario%20o%20password%20incorrecto "
end if

end if%>


Al parecer es problema con todas las opciones que empiezan con "rs". Alguien me puede indicar que debo modificar o mas bien como modifico el "rs" para que em quite el error.

De ante mano muchas gracias
__________________
Guapo Ben
Servidor y Amigo :adios:
  #2 (permalink)  
Antiguo 19/02/2003, 12:53
Avatar de bakanzipp  
Fecha de Ingreso: noviembre-2001
Ubicación: santiago de shilli
Mensajes: 2.554
Antigüedad: 22 años, 7 meses
Puntos: 0
te falta crear el objeto recordset

Código:
set conn = Server.Createobject("adodb.connection")
conn.open strconn
sqltxt="Select * from usuarios where usuario='"&usuario&"' and password= '"&password&"'"
'response.write sqltxt
set rs= Server.Createobject("ADODB.Recordset") 
rs.Open sqltxt, conn
  #3 (permalink)  
Antiguo 20/02/2003, 02:00
Avatar de Potro  
Fecha de Ingreso: abril-2001
Mensajes: 2.249
Antigüedad: 23 años, 1 mes
Puntos: 39
Lo que puedo ver es que tienes esto y creo que esto esta mal...

session("autorizacion")=1
session("acceso") =rs("acceso")

debes poner solo una...

si es la primera session("autorizacion")=1 espara verificar solo que este en la base de datos o nien la segunda..


session("acceso") =rs("acceso")

Para poder hacer una sseción validando un campo en tu tabla de tu base de datos.... que debe de llamarse acceso por lo regular son numericos...
__________________
Paginación en FLASH,

http://www.forosdelweb.com/f62/pagin...o-aqui-540241/
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 21:39.