Voor m'n login-pagina gebruik ik ongeveer deze code (overbodige dingen weggelaten)
De loginedone.asp pagina bestaat uit een vrij simpel stukje code
Eerst en vooral mogen er opmerkingen komen over de manier van de login-pagina (wat er beter zou kunnen en wat er echt dom is dat ik gedaan heb). Maar ik wil ook ff vragen hoe het komt dat dit soms werkt en soms niet ?!
Is vrij raar, maar meeste van de tijd werkt het niet (dit alles draait op brinkster). Ik vermoed dat ik wat fout doe met de sessions ?!
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
| <%
if session("loggedin") = "yes" then
%>
<p>Hoi <%= session("nick")%> u bent reeds ingelogd, u kan uitloggen door op volgende link te klikken.
</p>
<p>
<a href="logout.asp">Log out</a>
<%
else
nick = request.cookies("nick")
if IsNull(nick) then
nick = ""
end if
%> </p>
<form method="POST" action="logindone.asp">
<tr>
<td width="14%">
<table>
<tr>
<td >
<p style="text-align: center">Nickname :</td>
<td> <input type="text" name="nick" value="<%=nick%>"></td>
</tr>
<tr>
<td width="14%">
</tr>
<tr>
<td width="14%">
<p style="text-align: center">Paswoord : </td>
<td width="86%"> <input type="password" name="pass" size="22"></td> </tr></table></td>
<td width="86%"></td> </tr></table><p align="center"><input type="submit" value="Login" name="B1"></p>
</form>
<%
end if
%> |
De loginedone.asp pagina bestaat uit een vrij simpel stukje code
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
| <%
Set DbConn = Server.CreateObject("Adodb.Connection")
DbPad = Server.MapPath(".\db\db.mdb")
DbConnStr = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & DbPad
DbConn.Open DbConnStr
nick = request("nick")
pass = request("pass")
set rstlogin = Server.CreateObject("Adodb.Recordset")
sqllogin = "SELECT nick,pass FROM tblchatters WHERE nick='" & nick & "' AND pass = '" & pass & "'"
rstlogin.open sqllogin, dbconn
response.cookies("nick") = request("nick")
if rstlogin.bof and rstlogin.eof then
response.write("Onjuiste login gegevens")
else
session("nick") = nick
session("loggedin") = "yes"
response.write("U bent correct ingelogd")
end if
%> |
Eerst en vooral mogen er opmerkingen komen over de manier van de login-pagina (wat er beter zou kunnen en wat er echt dom is dat ik gedaan heb). Maar ik wil ook ff vragen hoe het komt dat dit soms werkt en soms niet ?!
Is vrij raar, maar meeste van de tijd werkt het niet (dit alles draait op brinkster). Ik vermoed dat ik wat fout doe met de sessions ?!