Mot de passe et login simple tout pret, sans mdb
Contenu du snippet
Salut à tous,
Voici un code qui permet de proteger vos pages. C'est un mot de passe très simple, sans connection à une base de donnée! La méthode est toute simple: relever le mot de passe et le login et les comparer au password...
Je l'ai un peu amélioré pour permettre d'avoir, au webmaster, une console, où tout les mod de passe sont affichés...
A FAIRE (OU AFFAIRE) à SUIVRE...
voila bon codage...
UN PROB..... WWW.GILLES4.COM // WEBMASTER@GILLES4.COM
Voici un code qui permet de proteger vos pages. C'est un mot de passe très simple, sans connection à une base de donnée! La méthode est toute simple: relever le mot de passe et le login et les comparer au password...
Je l'ai un peu amélioré pour permettre d'avoir, au webmaster, une console, où tout les mod de passe sont affichés...
A FAIRE (OU AFFAIRE) à SUIVRE...
Source / Exemple :
-------------------admin.asp----------------------
<% ' Liste des mots de passe
dim password(5,3)
i=0 : niv=1 ' Webmaster
i=i+1 : password(i,1) = "toto" : password(i,2)="toto"
password(i,3)=niv
niv=2 ' Collaborateurs
i=i+1 : password(i,1) = "invite" : password(i,2)="collab"
password(i,3)=niv
i=i+1 : password(i,1) = "invite" : password(i,2)="collab"
password(i,3)=niv
niv=3 ' Membres
i=i+1:password(i,1)="invite":password(i,2)="membre"
password(i,3)=niv
i=i+1 : password(i,1) = "invite" : password(i,2)="membre"
password(i,3)=niv
' Si le lien contient ?pass=no
' on vide le cookie
if request("pass")="no" then
response.cookies("passe5")=""
' Sinon si le visiteur a validé le formulaire
elseif request("pass")<>"" then
' on compare avec la liste
for i = 1 to ubound(password)
' si le login et le pass sont OK
if request("login")=password(i,1) _
and request("pass")=password(i,2) then
' on stocke le niveau dans un cookie
response.cookies("passe5")=password(i,3)
exit for
end if
next
end if
%>
<!-- #include file="_protect.asp"-->
<% ' Lien si identifié
if protect<"4" then%>
<A href="http://www.gilles4.com">Déconnecter</A>
<% ' Liste des login/pass si niveau 1 ou 2
if protect<"3" then%>
<BR>
<table width="100%" >
<tr>
<td width="50%"> <br>
<table width="50%" bgcolor=#EEEEFF>
<tr bordercolor="#EEEEFF">
<th colspan=4 nowrap
>Liste des mots de passe</th>
</tr>
<tr bgcolor=#DDDDEE>
<td> LOGIN </td>
<td> PASSWORD </td>
<td> CATÉGORIE</td>
<td>ENREGISTRÉ LE: </td>
</tr>
<%for i=1 to ubound(password)
' seulement niveau < ..:o)
if password(i,3) > cInt(protect) then%>
<tr>
<td nowrap><%=password(i,1)%></td>
<td nowrap><%=password(i,2)%></td>
<td><%=nivo(password(i,3)-1)%></td>
<td><%response.write("18 Août 2004")%>
</td>
</tr>
<%end if
next%>
</table>
<p> </p></td>
<td width="50%"><div align="center">
<table width="100%" >
<tr>
<td bgcolor="#EEEEFF"><div align="center"></div></td>
</tr>
<tr>
<td bgcolor="ddddee"> <div align="center"><a href="Mail.asp" target="_top" style="color: #FFFFFF">Messages E-mail </a></div></td>
</tr>
<tr>
<td bgcolor="#EEEEFF"><div align="center"></div></td>
</tr>
</table>
</div></td>
</tr>
</table>
<%end if
else ' Formulaire d'identification sinon
%>
<p> </p>
<form method="post" action="admin.asp">
<table width="100%" height="100%" >
<tr>
<td height="455"><div align="center">
<table width="100%" height="77%" >
<tr>
<td height="223"> </td>
</tr>
<tr>
<td height="222">
<div align="center">
<table width="50%" >
<tr>
<td bgcolor="#7F9DB9"><div align="center">Pour vous connecter entrer votre Password. </div></td>
</tr>
<tr>
<td height="36"><div align="center">
<table>
<tr bgcolor="eeeeff">
<td><div align="center">Login:<br>
</div></td>
<td><div align="center">Password:<br>
</div></td>
</tr>
<tr bgcolor="#7F9DB9">
<td><div align="center">
<input name="login">
</div></td>
<td><div align="center">
<input type="password" name="pass">
</div></td>
</tr>
</table>
</div></td>
</tr>
<tr bgcolor="#7F9DB9">
<td width="20%" bgcolor="#FFFFFF"><div align="center">
<input type="Submit" value="Entrer">
</div></td>
</tr>
</table>
</div> <p align="center"> </p></td></tr>
</table>
</div></td>
</tr>
</table>
</form>
<%end if%>
--------------------------_protect.asp---------------------------------------------------
<% ' Libellés des niveaux
nivo = Array("WebMaster","Collaborateur","Membre")
' On lit le cookie
protect=request.cookies("passe5")
' si vide >> niveau 4
if protect="" then protect="4"%>
<center>
<% ' si identifié >> lien vers page Admin
if protect<"4" then
%><A href="admin.asp">Page
<%=nivo(cInt(protect)-1)%></A> -
<%end if%>
<A href="http://www.livre-dor.net/livre.php?livredor=4729">Livre d'or</A> -
<A href="http://www.gilles4.com">Départ du site</A>
</center><hr>
Conclusion :
voila bon codage...
UN PROB..... WWW.GILLES4.COM // WEBMASTER@GILLES4.COM
A voir également
- Mot de passe et login simple tout pret, sans mdb
- Authentification login/mot de passe java ✓ - Forum Java
- L'authentification en java - Forum Java
- Authentification Login/mot de passe avec interface graphique - Forum Java
- Formulaire login et mot de passe php - Forum PHP
- Melangeur de mot - Forum VB.NET
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.