Buenos días...
Estoy tratando de accesar a una pagina despues de accesar a una BD en Acces pero siempre me accesa sin mostrarme el contenido final... Este es el codigo
<%'Option Explicit
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("/metro/db/security.mdb")
sql = "SELECT * FROM accesos WHERE num_cedula = '" &Request.form("usuario") &"' and cha_password = '" &Request.form("password") &"'"
'Ejecuta un sentencia SQL de consulta y Recorre todas las filas del resultado
SET RS = Conn.Execute(sql)
'Si no se encuentra nada, se muestra un mensaje informativo
IF RS.eof THEN
Response.Write "<CENTER>"
Response.Write "<font face='Verdana, Arial, Helvetica, sans-serif' color='#0066FF' size='2'>"
Response.Write "<BR> <BR>"
Response.Write "Lo siento. Usuario no registrado o contraseña incorrecta"
Response.Write "<BR> <BR>"
Response.Write "Presione <a href='javascript:history.go(-1)'>aqui</a> para volver a la página anterior"
Response.Write "<BR> <BR>"
Response.Write "<a href='javascript:history.go(-1)'><img src='Images/met_back.gif' width='42' height='31' border='0'></a>"
Response.Write "</font>"
Response.Write "</CENTER>"
RS.close
Conn.close
Response.End
else
Response.Redirect ("prueba.asp")
End If
RS.close
Conn.close
%>
Me pueden decir en que esta fallando el codigo...
Gracias....
