Page d'accueil>Tutoriel de programmation réseau>Tutoriel ASP

Programme de vérification de la page de connexion de la production ASP

Auteur：Eve Cole Date de mise à jour：2025-04-27 10:32:01

Recommandé: Tutoriel ADO débutant: affichage ADO
La façon la plus courante d'afficher les données d'un ensemble d'enregistrements est d'afficher les données dans une table HTML. Afficher les noms de champ et les valeurs de champ Nous avons une base de données nommée Northwind, et nous voulons afficher les données dans la table des clients (n'oubliez pas d'enregistrer ce fichier avec .asp comme extension): htmlbody% Set Conn = server.createObject (

Script de vérification de la connexion de l'utilisateur, chkpwd.asp

  1.  <%
  2.  '========= Script de vérification de connexion utilisateur ========
  3.  'Si l'objet passé n'a pas été défini, il est défini comme faux, indiquant qu'il n'a pas réussi la vérification
  4.  IFiSempty (session (passé)) puis
  5.  Session (passée) = false
  6.  Endire
  8.  'Session (passé) = false, ce qui signifie que les informations de vérification transmises du formulaire n'ont pas encore été adoptées.
  9.  IfSession (passé) = falsethhen
  10.  Username = request.form (nom d'utilisateur)
  11.  Userpwd = request.form (userpwd)
  13.  IfUsername = alors
  14.  Errmsg = Conseil: veuillez saisir votre nom d'utilisateur et votre mot de passe
  15.  Autre
  16.  '==============================================.
  17.  SetConn = server.createObject (adodb.connection)
  18.  Conn.ConnectionString = Driver = {sqlServer}; server = 192.168.1.3; uid = sa; pwd =; database = zcmrs
  19.  Conn.open
  20.  '=========================== Lisez les données de l'utilisateur de la table Log ========================================.
  21.  'Définir l'objet RecordSet
  22.  Setrs = server.createObject (adodb.recordSet)
  23.  'Réglez le service de connexion de l'objet de connexion
  24.  Setrs.activeConnection = Conn
  25.  'Régler le type de curseur
  26.  Rs.cursortype = 3
  27.  'Ensemble de records ouverts
  28.  Rs.OpenseLelectUserName, PasswordFromerPuserwhereserName = '& username &'
  29.  '==============================================.
  30.  Ifrs.eoftthen
  31.  Errmsg = pourboire: l'utilisateur n'existe pas ou le mot de passe est mauvais
  32.  Autre
  33.  Ifuserpwd <> rs. champs (mot de passe) puis
  34.  Errmsg = Tip: Login a échoué! Erreur de mot de passe?
  35.  Else'logine avec succès
  36.  Errmsg =
  37.  Session (passé) = Vrai
  38.  Session (nom d'utilisateur) = Rs.fields (nom d'utilisateur)
  39.  'Identifier la session des autorisations utilisateur (utilisateur) = Rs.Fields (UserID)
  40.  Endire
  41.  Endire
  42.  Endire
  43.  Endire
  44.  'Après l'échec de la connexion, le formulaire de connexion sera dessiné
  45.  Ifnotession (passé) = truethen
  46.  %>
  48.  <html>
  49.  <A-Head> <Title> Design home_dwww.cn </Title>
  50.  <Styletype = Text / CSS>
  51.  <! -
  52.  .Style1 {Font-Size: 12px; Font-Weight: Bold; margin-left: 120px; contour: double}
  53.  ->
  54.  </ style>
  55.  <Styletype = Text / CSS>
  56.  <! -
  57.  .Style2 {Font-Size: 12px; Font-Weight: Bold; contour: Double; Color: # FF3333}
  58.  ->
  59.  </ style>
  60.  </ head>
  62.  <BodyLeftMargin = 0Topmargin = 0marginheight = 0marginwidth = 0bgColor = # 000000>
  63.  <divid = parenstyle = hauteur: 300; largeur: 450; style bordure: solide; bordure de bordure: #fffff; margin-top: 80px; margin-left: 25%; marge-droit: 25%; fond-couleur: #fffff>
  65.  <Divid = Denglustyle = Font-Size: 12px; Font-Weight: Bold; Background-Color: # 0099FF; Text-Align: Center; Height: 40px;> <br> Erp System Login </div>
  66.  <formAction = <% = request.servervariables (path_info)%> méthode = postname = myformId = myform>
  67.  <pclass = style1> nom d'utilisateur: <inputName = userNameType = textid = usernameSize = 18maxLength = 20>
  68.  </p>
  69.  <pclass = style1> Mot de passe: <inputName = userPwdType = PasswordId = userPwdSize = 18MaxLength = 20>
  70.  </p>
  71.  <palign = centerClass = style2> <% = errmsg%> </p>
  72.  <p>
  73.  <futType = Subitalign = MiddLename = soumidValue = Système de connexion>
  74.  <putName = RegEType = Buttonalign = MiddleOnClick = Location = 'Register.asp'id = regeValue = Register User>
  75.  </p>
  76.  </ form>
  77.  </div>
  79.  </docy>
  81.  </html>
  82.  <%
  83.  '<pclass = style1> Code de vérification: <inputName = checkCodeType = textid = checkCodeSize = 6MaxLength = 4>
  84.  '<ImgStyle = margin-droite: 40pxalt = src = commun / getcode.asp> </p>
  85.  réponse.
  86.  Endire
  87.  %>

Page pour visiter ERP.asp

  1.  <! - # includeFile = chkpwd.asp ->
  2.  <body>
  3.  <divSTyle = 'font-size: 12px; font-weight: bold; border: 1pxsolid # 001; padding: 4px; background: #ffccff; margin-top: 0;'> bienvenue pour utiliser le système de requête ERP, l'utilisateur actuel déconnecté est:
  4.  <%
  5.  IfSession (passé) = truethen
  6.  Réponse.write (session (nom d'utilisateur))
  7.  Endire
  8.  %> <href = logout.asp> quitter le système </a>
  9.  </div>
  10.  </docy>

Chaque fois que vous ouvrez ERP.asp, vous exécutez d'abord chkpwd.asp (), qui peut effectivement empêcher les utilisateurs non autorisés d'accéder à la page Web spécifiée.

Logout.asp System Exit

  1.  <body>
  2.  <%
  3.  Session (passée) = false
  4.  Session (nom d'utilisateur) =
  5.  Réponse.redirect (index.asp)
  6.  %>
  7.  </docy>

Soumettre le formulaire à l'aide d'images

  1.  <formName = form1Method = postaction =>
  2.  <tdalign = droite> <inputType = ImageMetHod = soumename = submitsrc = image / loginin.gifwidth = 70Height = 21Alt = soumed> </td>
  3.  </ form>

Partager: Tutoriel ADO débutant: ADO Ajouter des enregistrements
Nous pouvons utiliser l'insert de SQL dans la commande pour ajouter des enregistrements aux tables de la base de données. Ajoutant des enregistrements aux tables de la base de données, nous voulons ajouter un nouvel enregistrement au tableau des clients dans la base de données Northwind. Nous devons d'abord créer un formulaire qui contient les champs que nous voulons sélectionner les données: HtmlBodyForm Method = Post Action = Dem

Articles connexes