tag IKKE højde for stor og små bogstaver
Jeg har dette login script, hvordan undår jeg at den tager højde for store og små bogstaver ?Så hvis brugernavn: Brugernavn bliver skrveet BrUgErNavN og ligeledes password, så skal den gå igennem alligevel
<%elseif cmd = "Login" then
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
brugernavn = Trim(replace(Request.Form("brugernavn"), "'", "''"))
password = Trim(replace(Request.Form("password"), "'", "''"))
'Tjecker om felterner er udfydlt
if brugernavn <> "" AND password <> "" then
Sql = "select * from medlemmer where brugernavn = '" & brugernavn & "'"
Set rs = Conn.Execute(sql)
'Tjecker om brugeren eksisterer
if rs.EOF or rs.BOF then
response.redirect "./?S=Forum&cmd=Login&msg=Brugernavnet findes ikke."
else
'tjecker om passwordsne matcher hinanden
if rs("password") = password then
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "select * from medlemmer where brugernavn = '" & brugernavn & "'"
rs.Open strsql, conn, 1, 3
Session("login") = true
Session("brugernavn") = Rs("brugernavn")
Session("id") = Rs("id")
if rs("admin") = 1 then Session("admin") = true end if
Conn.Execute("UPDATE medlemmer SET Online = 1 WHERE id=" & session("id") & "")
Conn.Execute("UPDATE medlemmer SET sidstelogin = now() WHERE id=" & session("id") & "")
response.redirect "./?S=Forum"
else
response.redirect "./?S=Forum&cmd=Login&msg=Den indtastede adgangskode er ikke korrekt."
end if
end if
rs.Close
set rs = nothing
else
response.redirect "./?S=Forum&cmd=Login&msg=Brugernavn/password ikke udfyldt."
end if
end if
%>
