🚀 go-pugleaf

"nobeat" <nobeat@freegates.be> wrote in message
news:k6c4htgtulfa5rakdn3mp01gm7shh76mkj@4ax.com...
> Iemand enig idee hoe ik zonder gebruik te maken van cookies een login
> systeem kan maken waarbij niet alle te beschermen pagina's asp paginas
> zijn???

is dit wat je zoekt ?

groeten,
Tom


in een bestand: login.asp

<%
Response.Expires = -1000 'Makes the browser not cache this page
Response.Buffer = True 'Buffers the content so our Response.Redirect will
work
Session("UserLoggedIn") = ""
If Request.Form("login") = "true" Then
    CheckLogin
Else
    ShowLogin
End If


Sub ShowLogin
%>
<form name=form1 action=login.asp method=post>
User Name : <input type=text name=username><br>
Password : <input type=password name=userpwd><br>
<input type=hidden name=login value=true>
<input type=submit value="Login">
</form>
<%
End Sub

Sub CheckLogin
If LCase(Request.Form("username")) = "guest" And
LCase(Request.Form("userpwd")) = "guest" Then
    Session("UserLoggedIn") = "true"
    Response.Redirect "protectedpage.asp"
Else
    Response.Write("Login Failed.<br><br>")
    ShowLogin
End If
End Sub
%>

in alle andere beveiligde asp's:

<%
Response.Expires = -1000 'Makes the browser not cache this page
Response.Buffer = True 'Buffers the content so our Response.Redirect will
work

If Session("UserLoggedIn") <> "true" Then
    Response.Redirect("login.asp")
End If
%>

This page is password protected.  If you are reading this you entered <br>
the correct name and password.