password med session
Hej EkspertenJeg har lavet et login system via session, hvor jeg bruger dette til at se om folk skriver det rigtige password / brugernavn:
Login.asp
-------------------------------------------------------------
<%
' Så folk ikke kan snyde.. (så let)
bruger = Trim(Replace(Request.Form("bruger"),"'",""))
password = Trim(Replace(Request.Form("password"),"'",""))
Set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open "Driver={mysql}; Server=xx.xx.xx.xx; Port=3306; Option=1123; Socket=; Stmt=; Database=x; Uid=x; Pwd=x;"
Set rs = Server.CreateObject("ADODB.Recordset")
strSQL = "Select * From password"
rs.open strSQL, conn, 1, 3
If bruger = rs("bruger") AND password = rs("password") Then
' Hvis korrekt sættes session til JA
Session("login1") = 1
Session.Timeout = 240
response.redirect "index2.asp"
Else
' Hvis forkert sættes ingen session til NEJ
Session("login1") = 0
Session.Timeout = 15
Response.redirect "index.asp"
end If
rs.Close
set strSQL = nothing
set rs = nothing
Conn.Close
%>
-------------------------------------------------------------
I toppen af alle min asp filer har jeg denne kode :
sikkerfil.asp
-------------------------------------------------------------
<%
If Session("login1") <> 1 Then
Response.Redirect "index.asp"
End If
%>
-------------------------------------------------------------
Så kommer mit problem, når jeg skal logge ind på siden skal jeg logge ind 2 gange før jeg kommer ind...
Jeg er 100 % sikker jeg skriver det rigtige brugernavn og password første gang..
Dvs. skal jeg logge ind på siden skal jeg gøre følgende:
1.) Gå ind på login siden:
2.) Skriver brugernavn + passowrd trykker login..
fejl jeg kommer ikke ind men bliver sendt tilbage til index.asp altså login siden igen.
3.) Skriver brugernavn + passowrd trykker login..
Så kommer jeg ind og alt virker fint...
Det virker ligesom at den ikke husker at jeg sætter session til en værdi, før jeg har prøvet at gøre det 2 gange...
Kan nogle hjælpe..
