Visa ett inlägg
Oläst 2006-10-10, 19:54 #2
Jan Eriksson Jan Eriksson är inte uppkopplad
Har WN som tidsfördriv
 
Reg.datum: May 2004
Inlägg: 1 352
Jan Eriksson Jan Eriksson är inte uppkopplad
Har WN som tidsfördriv
 
Reg.datum: May 2004
Inlägg: 1 352
Flera små fel. Har städat upp den så att den borde fungera nu.

<%

if Session("inloggad") = "jajamen" and request.querystring("vad") = "loggaut" then
Session.abandon
response.redirect("hemligt.asp")
end if


if Len(request.querystring("login")) > 0 and Len(request.querystring("pass")) > 0 and request.querystring("vad") = "loggain" then
pass = request.querystring("pass")
inloggad = false

Select case lcase(request.querystring("login"))
case "funki"
if pass = "apa" then
inloggad = true
end if
case "login"
if pass = "password" then
inloggad = true
end if
end select

if inloggad then
Session("inloggad") = "jajamen"
response.redirect("hemligt.asp")
end if
end if

if not Session("inloggad") = "jajamen" then
%>
<form action="login.asp">
<input type="hidden" name="vad" value="loggain">
<input type="text" name="login">
<input type="password" name="pass">
<input type="submit" value="Logga in">
</form>
<%
end if
%>
Jan Eriksson är inte uppkopplad   Svara med citatSvara med citat