Prøver lige det Casper skrev, men vil da godt se det
Ok... Jeg sender det lige i løbet af de næste par timer... hehe... skal jo lige have lavet det inden jeg kan vise dig det...
/Mads
Her er det så:
Filen hvor man skal kunne skrive login navn og pass:
<html>
<body>
<% if Request("mode") = "login" then%>
<form method="post" action="Logsystem.asp?mode=logud">
<input type="submit" value="Log ud">
</form>
<%else%>
<table width="250">
<form method="post" action="logsystem.asp">
<tr>
<td width="75">
<p>Navn:</p></td>
<td width="175">
<input type="text" size="23" name="login"></td></tr>
<td width="75">
<p>Kode:</p></td>
<td width="175"><input type="password" size="23" name="password"></td></tr>
<td width="75">
</td>
<td align="center" width="175>
<center><input type="submit" value="Log ind"><input type="submit" Value="log ind"><br>Der skelnes IKKE mellem STORE og små bogstaver!!</center><br><br><br></td></tr>
</form>
</table>
<%end if%>
</body>
</html>
Koden "logsystem.asp" er her:
<html>
<body>
<%if mode = "logud" then%>
<center><font size="4" color="0075db"><br>Du er nu logget ud!</font></center>
<%Session.Abandon%>
<%else%>
<%Sql = "select * from Brugere where Navn = '" & Request.Form("login") & "'"
Set rs = Conn.Execute(sql)%>
<%' Tjecker om brugeren eksisterer
if rs.EOF or rs.BOF then %>
<b>Bruger navn forkert!</b>
<center><font color="red" size="4">Brugernavnet var forkert!!! Prøv igen<br>
' Laver en prøv igen knap
<Input Type='submit' onClick='history.back();' value='Prøv igen'
style='font-family:FONT'
style='background:C0C0C0'
style=color:'000000'></font></center>
<%else
' Tjekker pass'er
If Request.Form("password") = rs("Kode") Then
' Hvis korrekt sættes session til JA
Session("login") = "JA" // Her kan der evt. Sættes niveau ind... ( Gøres såden: " & =rs("Niveau") & "... Istedet for JA)
Session("Navn") = Request.Form("login")
Session.Timeout = 60%>
<%else%>
<center><b>Passwordet forkert!</b>
' Laver igen en 'prøv igen' knap
<font color="red" size="4">Passwordet var forkert!!! Prøv igen<br><Input Type='submit' onClick='history.back();' value='Prøv igen'
style='font-family:FONT'
style='background:C0C0C0'
style=color:'000000'></font></center>
<%end if%>
<%end if%>
<%end if%>
<% Response.Redirect "default.asp"%>
<%' Luk databaseforbindelse
Conn.Close
Set Conn = Nothing %>
</body>
</html>
Det er sådan jeg ville gøre.. Når så det hele skal bruges til at tjekke om brugeren har lov til at åbne siden bruger du følgende kode i toppen af siden hvor det skal tjekkes:
<%
' Hvis brugeren ikke har højt nok niveau
' sendes han/hun direkte til formularen
If Session("login") < "(Krævet niveau)" Then
Response.Redirect "default.asp"
End If
%>
Håber du forstår...
P.S. Skriv i denne tråd hvis du ikke forstår det.....
/Mads