Hier:
Hallo, folgende Zeile auf der Startseite.
<table border="0" cellspacing="0" cellpadding="0" width="100">
<tr>
<td width="111">
<p align="center">
<font face="MS Sans Serif" size="2" color="#FFFFFF">
Benutzername:</font>
</p>
</td>
</tr>
<tr>
<td width="111">
<p align="center">
<font face="MS Sans Serif" size="2" color="#FFFFFF">
<input type="text" name="formUserName" size="10">
</font>
</p>
</td>
</tr>
<tr>
<td width="111">
<p align="center">
<font face="MS Sans Serif" size="2" color="#FFFFFF">
Passwort:</font>
</p>
</td>
</tr>
<tr>
<td width="111">
<center>
<font face="MS Sans Serif" size="2" color="#FFFFFF">
<input type="password" name="formPasswort" size="10">
</font>
</center>
</td>
</tr>
</table>
Und den folgenden Code in der geschützten Seite als ASP Seite.
<%
Set db = Server.CreateObject("ADODB.Connection")
db.Open"RWB"
%>
<% Set Rs = db.Execute ("SELECT * FROM rwBenutzer WHERE UserName ='" &formUserName&"' " ) %>
<HTML>
<HEAD>
<TITLE>PWTEST</TITLE>
</HEAD>
<BODY leftmargin="0" topmargin="0" bgcolor="#FFFF00" link="#336699" vlink="#800000" alink="#800000">
<%
If rs.eof then
response.write "<center><BR><BR><BR>Dieser Benutzer existiert nicht."
response.write "<br>Bitte melden Sie sich erst an.</center>"
response.end
Else
End if
%>
<%
IF rs("Passwort")<>request.form("formPasswort") THEN
response.write "<Center>Das Passwort ist falsch.<BR><BR>"
response.write "<input type='button' value='Noch ein Versuch' onclick=history.back()><BR><BR>"
response.write " <BR><BR> Sollten Sie Ihr Passwort vergessen haben? <BR> Mailen Sie uns.</Center>"
response.end
ELSE
END IF
%>
Die sichererste und fast einzige Methode, da Serverseitig . ;-))
Gruss
Bernhard
