Cookie overskrives ikke ??????
Hejjeg har lavet et login system til min side....
som lige nu kun har to profiler ....
en test profil
og min egen profil
Lige nu har jeg en cookie der går ind og tager
medlemsid i min tabel så når man udskriver
den får man at vide hvilket medlems id den
pågældende bruger har.
Jeg vil gerne kunne logge ind som test profilen
og det kan jeg da også nu ....
eneste problem er at min cookie skriver stadig
mit medlemsid og ikke testprofilens når jeg
udskriver den til skærmen.....
altså jeg vil gerne have jeg kan skrifte imellem
disse 2 profiler og jo dermed også disse
to cookies når jeg vil ..... hvordan gør jeg det ?
Her er min kode:
formular.asp
<%
if Request.ServerVariables("REQUEST_METHOD") = "POST" then
' Databaseforbindelse - husk at angive sti til din database
Set Conn = Server.CreateObject("ADODB.Connection")
DSN = "DRIVER={Microsoft Access Driver (*.mdb)}; "
DSN = DSN & "DBQ=" & Server.MapPath("/db/hp.mdb")
Conn.Open DSN
Set rs = Server.CreateObject("ADODB.RecordSet")
username = replace(Request.Form("username"),"'","")
password = replace(Request.Form("password"),"'","")
strSQL= "SELECT * FROM medlemmer WHERE (brugernavn= '" & username & "' AND kode='" & password & "') AND (status = 1 OR status = 2)"
Set rs = Conn.Execute (strSQL)
if not rs.EOF then
session("loginOK") = "naturligvis"
session("loginMemberID") = rs("ID")
response.cookies("forumData")("brugerID") = Session("loginMemberID")
response.cookies("forumData").Expires = now + 365
Conn.Close
'Den side man skal til når man er logget ind
Response.Redirect("dokument.asp")
else
session("loginOK") = ""
session("loginMemberID") = ""
if not rs.EOF then
session("loginOK") = "naturligvis"
session("loginMemberID") = rs("memberID")
response.cookies("forumData")("brugerID") = Session("loginMemberID")
response.cookies("forumData").Expires = now + 365
Conn.Close
'Den side man skal til når man er logget ind
else
Response.Redirect("til.asp")
session("loginOK") = ""
session("loginMemberID") = ""
response.cookies("forumData")("brugerID") = ""
end if
end if
end if
%>
<html>
<head></head>
<body bgcolor="#999966" text="#000000" link="#000000" vlink="#000000" alink="#FFFFFF">
<center><p>Velkommen til login her:</p>
Tilmeld dig <a href="http://iceb.ljnet.dk/flash/login/til.asp" target="_blank"> her</a>
<table border="1">
<form method="post" action="formular.asp">
<tr><td>Brugernavn:</td><td><input name="username"></td></tr>
<tr><td>Kode:</td><td><input type="password" name="password"></td></tr>
<tr><td colspan="2" align="center"><input type="submit" value="Login" name="Action">
</td></tr>
</form></table>
<%
response.write request.cookies("forumData")("brugerID")
%>
For tests only user: ice pass: ic
</center>
</body>
</html>
