6 svar · 301 visningar · startad av maniac
finns det ingen som har ett loginscript som inte är onödigt tillkrånglat.
det jag behöver är:
* den kollar namn och lösen från databas.
* den använder sessions.
* vidareskickning till ny sida efter inloggning.
jag behöver inte saker som olika typer av användare osv. bara man kommer till en ny sida efter inloggning.
jodå, det finns massor! jag vet inte hur säker din inloggning ska vara men idg har ju ett, där man använder kontroll av username och password genom en databas, samt använder det sessions och man skickas vidare till en annan sid...bra att börja med kanske? :e
jag har provat idgs script och det var otroligt klumpigt och dåligt. onödigt krångligt. ingen av er som har ett sånt script som jag söker. eller någon annan här på forumet? vore grymt tacksam!
Detta använder inte någon databas men är ganska bra ändå. Döp denna fil till inclog.asp
<%
Response.Buffer = True
Function ValidateLogin( sId, sPwd )
ValidateLogin = False
' -------------------------------------------------------------------
' Användarnamn och Lösenord är "test", ändra till vad du vill.
' -------------------------------------------------------------------
If sId = "test" AND sPwd="test" Then
ValidateLogin = True
End If
End Function
Dim sText, fBack
fBack = False
If Request.Form("dologin") = "yes" Then
If ValidateLogin( Request.Form("id"),Request.Form("pwd") ) = True Then
fBack = True
' --------------------------------------------------------------------
' Session = "logonid". Om du har fler av detta script på servern
' byt till olika namn för annars kan man komma in på flera sidor.
' --------------------------------------------------------------------
Session("logonid") = Request.Form("id")
Else
sText = "Fel användarnamn eller lösenord!"
End If
Else
If Session("logonid") <> "" Then
fBack = True
Else
sText = ""
End If
End If
If fBack = False Then %>
<html>
<head>
<title>Logga in</title>
</head>
<body onload="document.inloggning.id.focus();">
<%=sText%>
<%
Dim sURL
sURL = Request.ServerVariables("SCRIPT_NAME")
If Request.ServerVariables("QUERY_STRING") <> "" Then
sURL = sURL & "?" & Request.ServerVariables("QUERY_STRING")
End If
%>
<form method="POST" name="inloggning" action="<%=sURL%>">
<input type="hidden" name="dologin" value="yes">
<div align="center">
<center>
<table border="0" width="350" cellspacing="1" bgcolor="#CC0000">
<tr>
<td width="100%">
<table border="0" width="100%" style="font-family: Verdana; font-size: 10pt" cellspacing="1" bgcolor="#FFFFFF">
<tr>
<td width="100%" bgcolor="#D7D7D7" colspan="2">
<p align="center"><b>SÄKERHETSSIDA</b></td>
</tr>
<tr>
<td width="100%" colspan="2">
<p align="center"><b>Logga in med Ert användarnamn och lösenord</b></td>
</tr>
<tr>
<td width="39%"><b>Användarnamn :</b></td>
<td width="61%"><input name="id" size="20" style="background-color: #CC0000; color: #FFFFFF; font-family: Verdana; font-size: 10pt; font-weight: bold"></td>
</tr>
<tr>
<td width="39%"><b>Lösenord :</b></td>
<td width="61%"><input type="password" name="pwd" size="20" style="background-color: #CC0000; color: #FFFFFF; font-family: Verdana; font-size: 10pt; font-weight: bold"></td>
</tr>
<tr>
<td width="39%"><input type="submit" value="Logga in" name="B1"></td>
</center>
<td width="61%">
<p align="right"><font size="1"><i><a href="http://www.hogstorp.nu" target="_blank">Hogstorps
IF</a></i></font></td>
</tr>
</table>
</td>
</tr>
</table>
</div>
</form>
</body>
</html>
<%
Response.End
End If
%>
Sedan inkluderar du följande rad högst upp på de sidor du vill skydda.
<!--#include file="inclog.asp"-->
det är sådär jag inte vill ha. jag ska göra så att jag kan registrera nya medlemmar och måste därför ha databas :/
Oki...en chansning ;)
Kolla här om det kan vara något. http://www.myscript.co.il/myscript/app.asp?app=mylogin