webForumDet fria alternativet

Enkelt inloggningsscript

ASPur Script - ASP

0 svar · 1 371 visningar · startad av Brimba

BrimbaMedlem sedan dec. 19995 875 inlägg
#1

1.asp

<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666"><form method="post" name="login" onSubmit="return validateform()" action="2.asp">
Användarnamn: <input name="user" size="30">
Lösenord: <input type="password" name="pass" size="30">
<input id="submit1" name="Login" type="submit">
</form>

2.asp
<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666"><%
' Kollar om man redan är inloggad
if Session("admin")="" Then

	' Om login namn inte finns så omdirigiera till login.asp

		if Request.Form("user") = "User1" AND StrComp(Request.Form("pass"), "pass1") = 0 OR Request.Form("user") = "user2" AND StrComp(Request.Form("pass"), "pass2") = 0 OR Request.Form("user") = "user3" AND StrComp(Request.Form("pass"), "pass3") = 0 Then
			Session("admin") = "UserOK"
			response.write "Du är nu inloggad..."
		else
			Response.write "Behörighet saknas..."
		End If
	else
		'Vad som händer om man redan var inloggad...
	End If

%>

På varje sida får man även kontrollera om man är inloggad eller ej, exempelvis:

<font size="1" face="Verdana, Arial, Helvetica, sans-serif">Kod:<font size="1" face="Verdana, Arial, Helvetica, sans-serif" color="#006666"><%
If session("admin") <> "UserOK" Then
response.redirect("login.asp")
End If
%>

Lycka till!

------------------
Mvh
Patrik aka Brimba
Brimbas lille ställe

121 ms totalt · 3 externa anrop · v20260731065814-full.29ac60f6
0 ms — hämta forumlista (cache)
0 ms — hämta statistik (cache)
119 ms — hämta tråd, inlägg och bilagor (db)