Um nur registrierten Usern den Zugang zur Seite zu gewähren ist es notwendig eine
Benutzernamen und Kennwort Abfrage auf der Seite einzubauen !
In dem folgendem Beispiel soll erklärt werden wie man so eine Benutzernamen und
Kennwortabfrage realisiert !

---------------------------------------------------------------------------------
Bitte geben Sie Namen und Kennwort ein:

             Name: .............
       Kennwort: .............
Kennwortwdh.: .............
---------------------------------------------------------------------------------

Zuerst wird eine Verbindung zur Datenbank aufgebaut.  Der Rest des Scriptes ver-
steht sich eigentlich von selbst es wird kontrolliert ob der Benutzernamen und das
Passwort in der Datenbank vorhanden und richtig geschrieben ist und wenn nicht,
können Sie wie in Zeile 15 beschrieben eine Funktion einbauen, wie z.b. eine Umleitung
auf die Anmeldeseite oder eine Fehlermeldung !

(01) <% (02) strConn = "DSN=logon" (03) set objConn = Server.CreateObject("ADODB.Connection") (04) objConn.Open strConn (05) check = false (06) fldName = trim(Request.Form("fldName")) & Request.QueryString("fldName") (07) fldPass = trim(Request.Form("fldPass")) & Request.QueryString("fldPass") (08) if len (fldName) > 0 and len(fldPass) > 0 then (09)  query = "Select * from logon where" (10)  query = query & "name = '"& fldName & "' (11)  query = query & "pass = '"& fldPass & "' (12)  set objRS = objConn.Execute(query) (13)  if not objRS.EOF then   check = true (14)       else (15)   ......Funktion bei Fehlender Angabe (16)  end if (17) end if (18) %>