<%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%>
<%'-- Aktivieren der Pufferung, um eine Umleitung initiieren zu können, wenn der User die richtigen Logindaten angegeben hat.
response.Buffer = true
'-- Wenn Username und Passwort mit den entsprechenden Parametern übereinstimmen,
' wird die Sessionvariabel "Login" auf den Wert "wahr" gesetzt. Eine Umleitung
' auf die geschützte Seite (uebersicht.asp) wird eingeleitet.
if request.Form("lUser") = "SimSim" And request.Form("lPass") = "stress" then
session("Login") = true
session("sId") = session.SessionID
response.Redirect("../frameset/mitte.html")
else
'-- Wenn der User an diese Stelle des Codes kommt, hat er entweder gar keine
' Loginangaben gemacht (1. Aufruf) oder er hat falsche Angaben gemacht.
' In beiden Fällen wird das Loginformular angezeigt.
%>
Login
<%End if%>