Det brukar vara lättare att få det att fungera om man i stället för att titta efter ett specifikt värde kollar om sessionsträngen är tom, dvs: If session("kontrollerad") <> "" Then
Återkommer om jag ser något fel i koden annars.
r) Den som använder sidan måste kunna lagra ett cookievärde för att få en session
Frågan#1
Kör följande kod som fungerar ypperligt hemmifrån mig, men när polare testar funkar det inte... Han verkar inte få en session tilldelad och blir därför inte godkänd och kan därför inte logga in på mina sidor! Det har fungerat men nu har han återinstsallerat sin läsare... Vi kör båda Internet Exploerer.
Kontrollera inloggning:
If Request.QueryString("do") = "check" Then
Set Conn = Server.CreateObject("ADODB.Connection")
Set Rs = Server.CreateObject("ADODB.Recordset")
Conn.Open "Driver={Microsoft Access Driver (*.mdb)}; DBQ=" & Server.MapPath("db/nyheter.mdb")
admin1 = Request.Form("admin1")
admin2 = Request.Form("admin2")
SQL = "Select ID, user, fornamn from traninganv where user = '" & admin1 & "'"
SQL = SQL & " And password = '" & admin2 &"'"
Rs.Open SQL, Conn %>
<td width="575" valign="top" class="text" align="left">
<%
If not Rs.EOF then
Session("kontrollerad") = "ok"
Session("anv") = Rs("user")
Session.Timeout = 15
Response.Redirect "anvtraning.asp?do=visa"
Else
Response.Write("Användare ")
Response.Write admin1
Response.Write "saknas!" & "<br>" & "Försök logga in igen!!!"
%> </td><%
End If
Rs.Close
Set Rs = Nothing
Conn.Close
Set Conn = Nothing
End IF
Godkänn att kolla sidorna eller inte:
***Här skiter det sig!!***
If session("kontrollerad") = "ok" Then
blablabla
<% Else Response.Redirect "traningmess.asp?do=sakna"
End iF %>
och hit skickas polaren!
Har jag missat något i mina sessionskunskaper.. de små eller måste man fixa läsaren på nåt sätt???!???
Tacksam för er hjälp!!!!!