Startseite>Tutorial zur Netzwerkprogrammierung>ASP-Tutorial

ASP -Produktion Anmeldeseite Überprüfungsprogramm

Autor：Eve Cole Aktualisierungszeit：2025-04-27 10:32:01

Empfohlen: Ado -Anfänger -Tutorial: Ado Display
Die häufigste Möglichkeit, Daten aus einem Datensatzsatz anzuzeigen, besteht darin, die Daten in einer HTML -Tabelle anzuzeigen. Feldnamen und Feldwerte anzeigen Wir haben eine Datenbank mit dem Namen Northwind und möchten die Daten in der Kundentabelle anzeigen (denken Sie daran, diese Datei mit .asp als Erweiterung zu speichern): HTMLBODY%SET Conn = Server.CreateObject (

Benutzeranmeldungsüberprüfungsskript, chkpwd.asp

  1.  <%
  2.  '========= Benutzeranmeldung Überprüfungsskript ===========.
  3.  „Wenn das übergebene Objekt nicht definiert wurde, ist es als falsch definiert, was darauf hinweist, dass es die Überprüfung nicht bestanden hat
  4.  IfiseMpty (Sitzung (bestanden)) dann
  5.  Sitzung (bestanden) = false
  6.  Endif
  8.  'Session (bestanden) = false, was bedeutet, dass die aus dem Formular übergebenen Überprüfungsinformationen noch nicht bestanden wurden.
  9.  IfSession (bestanden) = falsethen
  10.  Benutzername = Request.Form (Benutzername)
  11.  Userpwd = request.form (userPWD)
  13.  Ifusername = dann
  14.  Errmsg = Tipp: Bitte geben Sie Ihren Benutzernamen und Ihr Passwort ein
  15.  Anders
  16.  "================================================================================================================================ alle
  17.  SetConn = server.createObject (adodb.Connection)
  18.  Conn.ConnectionString = TREIBREIS = {SQLSERVER}; Server = 192.168.1.3; uid = sa; pwd =; Datenbank = ZCMRS
  19.  Conn.open
  20.  '============================ Lesen Sie Benutzerdaten aus Tabellenprotokoll
  21.  'Recordset -Objekt definieren
  22.  Setrs = server.createObject (adodb.recordset)
  23.  'Setzen Sie ConnectionString des Verbindungsobjekts
  24.  Setrs.ActiveConnection = conn
  25.  'Cursortyp einstellen
  26.  rs.cursortype = 3
  27.  'Open Record Set
  28.  rs.openselectusername, Passwortfromerpuserwhereusername = '& Benutzername &'
  29.  "================================================================================================================================ alle
  30.  Ifrs.eoftthen
  31.  ERRMSG = TIPP: Der Benutzer existiert nicht oder das Passwort ist falsch
  32.  Anders
  33.  IfuserPWD <> rs.fields (Passwort) dann
  34.  Errmsg = Tipp: Anmeldung fehlgeschlagen! Passwortfehler?
  35.  Sonst erfolgreich
  36.  Errmsg =
  37.  Sitzung (bestanden) = true
  38.  Sitzung (Benutzername) = Rs.Fields (Benutzername)
  39.  Identifizieren Sie die Sitzung der Benutzerberechtigungen (userID) = rs.fields (userID)
  40.  Endif
  41.  Endif
  42.  Endif
  43.  Endif
  44.  'Nach dem Ausfall der Anmeldung wird das Anmeldeformular gezeichnet
  45.  Ifnotsession (bestanden) = Truethen
  46.  %>
  48.  <html>
  49.  <Head> <titels> Design home_dwww.cn </title>
  50.  <styLetype = text/css>
  51.  <!-
  52.  .Style1 {Schriftgröße: 12px; Schriftgewicht: BOLD; Margin-Links: 120px; Umriss: Double}
  53.  ->
  54.  </style>
  55.  <styLetype = text/css>
  56.  <!-
  57.  .Style2 {Schriftgröße: 12px; Schriftgewicht: BOLD; Umriss: Double; Farbe:#ff3333}
  58.  ->
  59.  </style>
  60.  </head>
  62.  <byLeftmargin = 0TopMargin = 0MarginHeight = 0MarginWidth = 0BGColor =#000000>
  63.  <divid = parentStyle = Höhe: 300; Breite: 450; Grenzstil: Solid; Grenzfarbe: #fffff; Margin-Top: 80px; Margin-Links: 25%; Margin-Right: 25%; Hintergrundfarbe: #fffff>
  65.  <divid = dingglustyle = Schriftgröße: 12px; Schriftgewicht: fett; Hintergrundfarbe:#0099ff; Text-Align: Mitte; Höhe: 40px;> <br> ERP-System-Login </div>
  66.  <formAction = <%= request.servervariables (path_info)%> method = postname = myFormId = myForm>
  67.  <pclass = style1> userername: <inputName = userernAmetype = textId = userernamesize = 18maxLength = 20>
  68.  </p>
  69.  <pclass = style1> password: <inputName = userpwdType = passwordId = userPWDSIZE = 18maxLength = 20>
  70.  </p>
  71.  <palign = CenterClass = style2> <%= errmsg%> </p>
  72.  <p>
  73.  <inputType = subMitalInn = middlenname = sublevalue = login System>
  74.  <inputName = Regetyp = buttonAlign = MiddleOnclick = location = 'register.asp'id = regeValue = Register Benutzer>
  75.  </p>
  76.  </form>
  77.  </div>
  79.  </body>
  81.  </html>
  82.  <%
  83.  '<pclass = style1> Verifizierungscode: <inputName = checkCodetype = textId = checkcodesize = 6maxLength = 4>
  84.  '<ImgStyle = margin-right: 40pxalt = src = Common/getCode.asp> </p>
  85.  Antwort.end
  86.  Endif
  87.  %>

Seite, um ERP.asp zu besuchen

  1.  <!-#includeFile = chkpwd.asp->
  2.  <body>
  3.  <divStyle = 'Schriftgröße: 12px; Schriftgewicht: BOLD; BORD: 1PXSOLID#001; Polster: 4px; Hintergrund: #ffccff; Margin-Top: 0;'> Willkommen, das ERP-Abfragesystem zu verwenden, der aktuelle angemeldete Benutzer ist:
  4.  <%
  5.  IfSession (bestanden) = truethen
  6.  Antwort.Write (Sitzung (Benutzername))
  7.  Endif
  8.  %> <Ahref = logout.asp> Beenden Sie das System </a>
  9.  </div>
  10.  </body>

Jedes Mal, wenn Sie ERP.asp eröffnen, führen Sie zuerst CHKPWD.asp () aus, wodurch nicht authorisierte Benutzer auf die angegebene Webseite zugreifen können.

Logout.asp System Exit

  1.  <body>
  2.  <%
  3.  Sitzung (bestanden) = false
  4.  Sitzung (Benutzername) =
  5.  Antwort.Redirect (index.asp)
  6.  %>
  7.  </body>

Formular mit Bildern einreichen

  1.  <formname = form1Method = postaction =>
  2.  <tdalign = rechts> <inputType = imagemethod = submitname = subMitSrc = Bild/loginin.gifwidth = 70Height = 21ASTT = Subjekt> </td>
  3.  </form>

Share: Ado -Anfänger -Tutorial: Ado Records hinzufügen
Wir können SQL's Insert in den Befehl verwenden, um Tabellen in der Datenbank Datensätze hinzuzufügen. Hinzufügen von Datensätzen zu Tabellen in der Datenbank möchten wir der Kundentabelle in der Northwind -Datenbank einen neuen Datensatz hinzufügen. Wir müssen zunächst ein Formular erstellen, das die Felder enthält, die wir Daten auswählen möchten: htmlbodyForm -Methode = post action = Dem

Ähnliche Artikel