Tjena. Jag har en databas med en tabell som heter tbl_members
sen har jag 5 kollumner i den. Det är en Access databas. Kollumerna är
Fld_userid
Fld_username
Fld_password
Fld_name
Fld_email
Jag checkar fall personen har skrivit rätt med
<%
'importing variables from loginpage
userlog = Request.Form("userlog")
passlog = Request.Form("passlog")
'Skapa ett server objekt för att koppla mot en Databas
Set dbConn = Server.Createobject("ADODB.connection")
'Öppna databasen
dbConn.Open "DRIVER={Microsoft Access Driver (\*.mdb)}; DBQ=" & Server.Mappath("db34345.mdb")
' Extracting the hits from the database
list = "SELECT \* FROM tbl_members WHERE fld_username='" & userlog & "' AND fld_password='" & passlog & "' "
Set rs = dbConn.Execute(list)
' setting login true or false status
If rs.EOF Then
Session("logged_status") = FALSE
Response.redirect("errorpass.html")
Else
user = rs("fld_userid")
Response.redirect("http://www." & user & " ")
End If
%>
Nu vill jag gör en session som gör att man måste logga in för att komma till sidan som man redirectas till när man skrivit rätt lösen. Man ska alltså inte kunna skriva rätt adress bara.
Jag testade med
<%if Request.Cookies("Username") <> "" then
Response.Redirect ("send them to view the web site")
session("submitted")="false"
else
'send them back to login page
Response.Redirect "index.html"
Response.End
end if%>
Detta la jag i en fil som ja döpte till check.asp sen la ja till include file = check.asp i den sidan där man skulle komma till när man logga in rätt.
Men jag kan inte logga in. Även fast jag skriver rätt pass så hoppar den tillbaka till login sidan ändå.
------------------
da main man :-)