Système de connexion pour la connexion ASP à la base de données Access_Application Tips

2019-12-22

I. Objectifs de base

Premièrement, le test de la table d'informations utilisateur existe dans la base de données Access Database.mdb:


Écrivez un système de connexion. Si le nom d'utilisateur entré par l'utilisateur n'existe pas dans le tableau, il demandera "Aucune de ces personnes", si le mot de passe entré est incorrect, il demandera "Erreur de mot de passe"


Si le nom d'utilisateur et le mot de passe saisis par l'utilisateur sont corrects, passez à la page de réussite de la connexion


Dans des circonstances normales, l'accès à la page de réussite de la connexion n'est pas autorisé en entrant l'URL


Deuxièmement, l'idée de base

L'utilisation de l'objet de session asp assure le transfert du nom d'utilisateur et du mot de passe.

La section contextuelle utilise le langage de script javascript et utilise asp pour interroger la table d'informations utilisateur.

La structure de base du site est la suivante:


Trois, le processus de production
L'ensemble du site utilise le code UTF-8 pour garantir qu'il ne sera pas tronqué, donc chaque page doit avoir Si vous utilisez la version supérieure de DW, elle sera ajoutée automatiquement. Pour la version inférieure, veuillez remplacer gb2312 par utf-8.

1. La page de connexion login.html n'est qu'une page statique d'un formulaire. La clé consiste à utiliser la méthode post pour transmettre des informations. L'action consiste à se connecter.asp


  
 
 
 
  login </ title>
 </ tête>

 <body>
 <form method = "post" action = "login.asp">
 nom d'utilisateur: <input type = "text" name = "username" />
 mot de passe: <input type = "password" name = "password" />
 <input type = "submit" value = "login" />
 </ formulaire>
 </ corps>
 </ html>

 </ pré>
 <br>
 <p> 2, la page de vérification de connexion login.asp est la page principale de ce système <br />
 </p>
 <br>
 <pre class = "brush: xhtml;">
 <% @ LANGUAGE = "VBSCRIPT" CODEPAGE = "65001"%>
 <! DOCTYPE html PUBLIC "- // W3C // DTD XHTML 1.0 Transitional // EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
 <html xmlns = "http://www.w3.org/1999/xhtml">
 <head>
 <meta http-equiv = "Content-Type" content = "text / html; charset = utf-8" />
 <title> login </ title>
 </ tête>

 <body>

 <%
 'Pour enregistrer les deux informations passées dans login.html avec des variables
 nom d'utilisateur = Request.Form ("nom d'utilisateur")
 password = Request.Form ("mot de passe")
 'La base de données est Database.mdb du répertoire parent
 %>
 <%
 db = "../ Database.mdb"
 'Connectez la base de données pour spécifier l'action, cette section doit occuper un <%%> indépendamment, sinon IE8 échouera dans certains cas
 Définissez conn = Server.CreateObject ("ADODB.Connection")
 conn.Open "driver = {Microsoft Access Driver (* .mdb)}; pwd = admin; dbq =" & Server.MapPath (db)
 %>
 <%
 Définissez rs = Server.CreateObject ("ADODB.Recordset")
 'Voir si ce nom d'utilisateur existe dans le tableau
 sql = "select * from test where username = '" + username + "';"
 rs.open sql, conn, 1,3
 'Si rien ne peut être trouvé, ouvrez la fenêtre et revenez à login.html
 si (rs.bof et rs.eof) alors
 %>
 <script>
 alerte ("Aucune de ces personnes");
 window.location.href = "login.html";
 </ script>
 <%
 Sinon, recherchez le mot de passe et comparez-le avec le mot de passe entré par l'utilisateur pour voir s'il est cohérent.
 'Le mot de passe détecté doit d'abord être intercepté avec une variable, qui ne peut pas être directement comparée dans ASP
 d'autre
 dbpwd = rs ("mot de passe")
 'Si incohérent, alors pop-up, ASP n'a pas! =, Signifie pas égal, veuillez utiliser <>
 si mot de passe> dbpwd alors
 %>
 <script>
 alerte ("Erreur de mot de passe");
 window.location.href = "login.html";
 </ script>
 <%
 d'autre
 "Si le nom d'utilisateur et le mot de passe sont saisis correctement, il y a cet utilisateur. Le délai d'expiration est d'empêcher l'utilisateur de se déconnecter anormalement. S'il n'y a aucune opération pendant 5 minutes, il est déterminé qu'il s'est déconnecté. Ok est un signe de connexion normale.
 Session.Timeout = 5
 Session ("username") = nom d'utilisateur
 Session ("login") = "ok"
 %>
 <script>
 alert ("Connexion réussie");
 window.location.href = "success.asp";
 </ script>
 <%
 fin si
 fin si
 N'oubliez pas de manquer de bases de données
 rs.close
 définir rs = rien
 conn.close
 définir conn = rien
 %>
 </ corps>
 </ html>

 </ pré>
 <br>
 <p> 3. success.asp <br />
  Rien à dire, la clé est de voir s'il a un signe de connexion normal, si le contenu de la connexion est correct, sinon, il affichera la page de connexion </p>
 <br>
 <pre class = "brush: xhtml;">
 <% @ LANGUAGE = "VBSCRIPT" CODEPAGE = "65001"%>
 <! DOCTYPE html PUBLIC "- // W3C // DTD XHTML 1.0 Transitional // EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
 <html xmlns = "http://www.w3.org/1999/xhtml">
 <head>
 <meta http-equiv = "Content-Type" content = "text / html; charset = utf-8" />
 <title> Bienvenue pour vous connecter </ title>
 </ tête>

 <body>
 <%
 si Session.Contents ("login") <> "ok" alors
 %>
 <script>
 alert ("Veuillez vous connecter normalement!");
 window.location.href = "login.html";
 </ script>
 <%
 d'autre
 Response.Write ("Bienvenue pour vous connecter", + Session.Contents ("nom d'utilisateur"))
 fin si
 %>
 <a href="exit.asp"> Quittez normalement </a>
 </ corps>
 </ html>

 </ pré>
 <br>
 <p> 4, exit.asp page de traitement de sortie <br />
 </p>
 <br>
 <pre class = "brush: xhtml;">
 <% @ LANGUAGE = "VBSCRIPT" CODEPAGE = "65001"%>
 <! DOCTYPE html PUBLIC "- // W3C // DTD XHTML 1.0 Transitional // EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
 <html xmlns = "http://www.w3.org/1999/xhtml">
 <head>
 <meta http-equiv = "Content-Type" content = "text / html; charset = utf-8" />
 <title> Sortie ... </ title>
 </ tête>

 <body>
 <%
 «Toutes les sessions expirent immédiatement et suppriment toutes les sessions
 Session.Abandon
 Session.Contents.RemoveAll ()
 %>
 <script>
 window.location.href = "login.html";
 </ script>
 </ corps>
 </ html>

 </ pré>
 <br>
 <p> Ce qui précède est l'intégralité du contenu de cet article. J'espère qu'il sera utile à l'apprentissage de chacun et j'espère que tout le monde le soutiendra.  </p></div>
 <link rel="stylesheet" type="text/css" href="js/shCore.css">
<link rel="stylesheet" type="text/css" href="js/shThemeDefault.css">
    <div style="clear: both;"></div>

</div>



<!-- Matomo -->
<script type="text/javascript">
  var _paq = window._paq || [];
  /* tracker methods like "setCustomDimension" should be called before "trackPageView" */
  _paq.push(['trackPageView']);
  _paq.push(['enableLinkTracking']);
  (function() {
    var u="//count.flyfishcourse.com/";
    _paq.push(['setTrackerUrl', u+'matomo.php']);
    _paq.push(['setSiteId', '15']);
    var d=document, g=d.createElement('script'), s=d.getElementsByTagName('script')[0];
    g.type='text/javascript'; g.async=true; g.defer=true; g.src=u+'matomo.js'; s.parentNode.insertBefore(g,s);
  })();
</script>
<!-- End Matomo Code -->


<div id="bottom">www.xd1998.com@2001-2030Partage De Technologie</div>
 
</body>

</html>