PDA

Volledige versie bekijken : Problemen met inlogscherm!!! HELP!

wepmeester
%Europe/Berlin %398 %2006, 10:33
Ik heb een script van internet geplukt.

Hij laat alles goed zien (layout)
De gebruikersnaam en wachtwoord zijn ingesteld op: vrijwilliger en wachtwoord

maar wat je ook intypt bij gebruikersnaam of wachtwoord hij geeft geen melding van incorrecte gegevens.

Ook al tik je bij gebruikersnaam en wachtwoord dit in: ojwhdojqwih

Hij laat je gewoon naar de beveiligde pagina erachter gaan.

Hij laat dus niet de "unieke"gebruikersnaam en wachtwoord zoals het is ingesteld, door!

dit zijn de codes:

inloggen.asp

<!--#include file="variabelen.asp" -->
<%
If Session("beveiligd") = True Then
Session.Timeout = SessieTimeout

Response.redirect "Vrijwilligers1.html"
Response.write "Je bent ingelogd!"
Else
If Gebruikersnaam = RequestGebruikersnaam AND Wachtwoord = RequestWachtwoord Then
Session("beveiligd") = True
Session.Timeout = SessieTimeout

Response.redirect "inloggen.asp"
Else
Session("beveiligd") = False
%>
<html>

<head>
<title>© WouterWeb.nl</title>
</head>

<body>

<form method="POST" action="Vrijwilligers07.html">
<p>Gebruikersnaam:<br>
<input type="text" name="gebruikersnaam" size="20"></p>
<p>Wachtwoord:<br>
<input type="password" name="wachtwoord" size="20"></p>
<p><input type="submit" value="Inloggen"></p>
<p><font face="Arial"><font size="1">Inlogsysteem</font><font size="1"> ©
WouterWeb.nl</font></font></p>
</form>

</body>

</html>
<%
End if
End if
%>

en

variabelen.asp

<%
Dim Gebruikersnaam, Wachtwoord

'Verander hieronder de inloggegevens en sessie timeout
Gebruikersnaam = "vrijwilliger" 'Vul een gebruikersnaam in
Wachtwoord = "wachtwoord" 'Vul een wachtwoord in
SessieTimeout = 15 'Sessie timeout in minuten

RequestGebruikersnaam = Request.Form("gebruikersnaam")
RequestWachtwoord = Request.Form("wachtwoord")

'Beveiliging op andere ASP pagina's toepassen
'Kopieer de onderstaande code (haal de apostroffen erovoor weg hè ;-), wijzig eventueel het pad naar variabelen.asp) en plak het bovenaan je ASP pagina.
'
'<!--#include file="variabelen.asp" -->
'<%
'If Session("beveiligd") = True Then
' Session.Timeout = SessieTimeout
'Else
' Response.redirect "inloggen.asp"
'End if
'%>

help me

of heeft iemand anders een super makkelijk script voor me wat wel in 1 keer werkt?
mech7
%Europe/Berlin %399 %2006, 10:35
Ik persoonlijk zou geen kant en klaar scriptje pakken maar kijken hoe het werkt zodat je tenminste snapt wat er gebeurt en je zelf wat kan maken :)
TheDutch
%Europe/Berlin %402 %2006, 10:39
Volgensmiij moet je de volgende regel aanpassen:

VERVANG:

If Gebruikersnaam = RequestGebruikersnaam AND Wachtwoord = RequestWachtwoord Then


DOOR:

If Gebruikersnaam = Request.Form(gebruikersnaam) AND Wachtwoord = Request.Form(wachtwoord) Then
TheDutch
%Europe/Berlin %410 %2006, 10:51
De code is erg rommelig en zit slecht in elkaar. Misschien dat het onderstaande het script laat werken, maar met zekerheid kan ik het niet zeggen door al het rommelige. Wanneer het niet werkt zou ik als ik jou was eens een basisboek kopen over ASP. Daar staan altijd wel lesjes in hoe je dit moet maken.

Zoals Mech7 al zei, het is beter om zelf te leren dan om te blijven copy/pasten.

VERVANG:

<!--#include file="variabelen.asp" -->
<%
If Session("beveiligd") = True Then
Session.Timeout = SessieTimeout

Response.redirect "Vrijwilligers1.html"
Response.write "Je bent ingelogd!"
Else
If Gebruikersnaam = RequestGebruikersnaam AND Wachtwoord = RequestWachtwoord Then
Session("beveiligd") = True
Session.Timeout = SessieTimeout

Response.redirect "inloggen.asp"
Else
Session("beveiligd") = False
%>
<html>

<head>
<title>© WouterWeb.nl</title>
</head>

<body>

<form method="POST" action="Vrijwilligers07.html">


DOOR:

<!--#include file="variabelen.asp" -->
<%
If Session("beveiligd") = True Then
Session.Timeout = SessieTimeout

Response.redirect "Vrijwilligers07.html"
Response.write "Je bent ingelogd!"
Else
If Gebruikersnaam = RequestGebruikersnaam AND Wachtwoord = RequestWachtwoord Then
Session("beveiligd") = True
Session.Timeout = SessieTimeout

Response.redirect "inloggen.asp"
Else
Session("beveiligd") = False
%>
<html>

<head>
<title>© WouterWeb.nl</title>
</head>

<body>

<form method="POST">