Ver Mensaje Individual
  #1 (permalink)  
Antiguo 26/09/2008, 19:25
Edyvargas
 
Fecha de Ingreso: septiembre-2008
Mensajes: 39
Antigüedad: 16 años, 7 meses
Puntos: 0
mayusculas y minusculas en base de datos

Hola, tengo un formulario de validación de sesión que comprueba si los datos introducidos corresponden a un nombre y contraseña de la base de datos,

si es así, se valida la sesión,
si no, no,

todo funciona bien, el problema es que al introducir los datos correctos sin importar si es en mayúsculas o minúsculas igual me valida la sesión, alguna idea de por que sucede esto?, Gracias

el código es este:

<%
Dim oconn,objrs,strsql,nom,pass
nom=request.form("nombre")
pass=request.form("password")

set oconn=server.createobject("adodb.connection")
set objrs=server.createobject("adodb.recordset")
oConn.Open("DRIVER={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("\ddpharma\datos\datos_ddpharma.mdb "))

if nom="" and pass="" then
session.abandon
else
strSQL= "SELECT * FROM ADMINISTRADORES WHERE NOMBRE ='" & nom & "' AND PASSWORD = '" & pass & "';"
objrs.Open strSQL, oConn

IF NOT(objrs.BOF AND objrs.EOF) THEN

session("autorizacion")=1
session("nombre")= objrs.fields("NOMBRE")
Session("a1")=objrs.fields("APELLIDO1")
Session("a2")=objrs.fields("APELLIDO2")
Response.redirect "comprobar_sesion.asp"
ELSE
session("autorizacion")=-1
Response.redirect "comprobar_sesion.asp"
END IF

END IF
%>

...y el formulario,