> Det drejer sig om at en person skal kunne...
Et forslag:
--- Login-siden (login.asp) ---
<%
If Request.Form("Submit") = "Login" Then
strUser = Trim(Replace(Request.Form("user"), "'", "''"))
strPass = Trim(Replace(Request.Form("pass"), "'", "''"))
Select Case strUser
Case "navn1"
If (strUser = "navn1" AND strPass = "kode1") Then
Session("admin") = 1
Response.Redirect("beskyttet_side.asp")
End If
Case "navn2"
If (strUser = "navn2" AND strPass = "kode2") Then
Session("admin") = 1
Response.Redirect("beskyttet_side.asp")
End If
Case Else
strFail = "Brugernavn eller kodeord er ikke korrekt! Adgang
nægtet!"
End Select
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Login</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<%
If strFail <> "" Then
Response.Write("<p style=""color: red;"">" & strFail & "</p>")
Set strFail = Nothing
End If
%>
<form action="login.asp" method="post" name="login" id="login">
<p>
Brugernavn: <input name="user" type="text" id="user">
</p>
<p>Kodeord:
<input name="pass" type="password" id="pass">
</p>
<p>
<input name="Submit" type="submit" id="Submit" value="Login">
</p>
</form>
</body>
</html>
--- Slut på Login-siden (login.asp) ---
--- Beskyttet side (beskyttet_side.asp) ---
<%
If NOT Session("admin") = 1 Then
Response.Redirect("login.asp")
End If
%>
<!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head>
<title>Beskyttet</title>
<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1">
</head>
<body>
<p>Tekst, der ikke kan ses af andre end brugere der er logget på!</p>
</body>
</html>
--- Slut på Beskyttet side (beskyttet_side.asp) ---
Du kan jo så bare oprette en "case" til alle de brugere der skal benytte
systemet. Husk at ændre i koden så det bliver deres rigtige brugernavne og
adgangskoder.
Mvh. Voller.