do_all "db=Name_der_Datenbank Emailfeld==$namerein sort=-Datum .....
wird die Ausgabe durch Emailfeld==$namerein gefiltert!

<perl>
#----Frage ob Eingabefeld Name nicht leer ist
if($namerein ne "")
{
#---wenn das der Fall ist, dann Namen aus DB Nutzer holen
  get "Emailfeld==!$namerein", "Name_der_Datenbank";
  if($Passwort ne "" && $Passwort eq $pwrein)
  {
    $_link.="&namerein=$namerein&pwrein=$pwrein";
    @_params=("htx", "db", "cmd", "namerein", "pwrein", "range");
#---Tabelle für Anzeige der (Listen)-Ausgabe festlegen
    out "<table width=530 border=1><tr><td>";
#---Äquivalent zu do <action=all> mit den Parametern für das Aussehen
    do_all "db=Name_der_Datenbank Emailfeld==$namerein sort=-Datum border=0 gridcolor=ffffff spacing=2 dataface=Arial datasize=2 databack=ffffef dataalign=left headcolor=006600 headalign=middle headback=ccff66 headalign=middle range^=0,6 pagebrowse=top buttonbrowse=top input=no sort=-Datum search=no ", "namerein", "pwrein", "ort_admin";
#---Abschließen der Tabelle für die (Listen)-Ausgabe
    out "</td></tr></table>";
  }

#----Nun folgt das, was passiert wenn Paßwort nicht eigeg. wurde und/oder falsch ist
else
  {
#----Ausgabe mit der Meldung, daß was falsch war
    out "<center><div align=left><h3><font face=Arial,Helvetica,sans-serif><font color=red>Anmeldung fehlgeschlagen!</font></font></h3>";
#----Feld Anmeldenamen wird geleert, damit neue Anmeldung losgehen kann
    $namerein="";
#---Zähler für Anzahl Anmeldeversuche - auf 3 gesetzt
      if ($cnt eq 3)
      {
#---Schriptausgabe mit Sprung zu anderem Template, wenn 3 erfolglose Anmeldevers.
     out '<script>';
     out ' document.location="http://baseportal.de/cgi-bin/baseportal.pl?htx=/......."';
     out '</script>';
    }
#---Ende der Zählerabfrage

  }

}
#------Ende der Abfrage von Nutzername und Paßwort
if($namerein eq "")
#---Wenn kein Nutzername angegeben wurde(oder 1. Aufruf der Seite)

out <<EOF;
<!-----Ausgabe bis zur Zeichenfolge EOF -->
<table width=430 border=1 bordercolordark=006600 bordercolor=00ff00>
<!----Tabelle für das Anmeldeformular und den "beschreibenden Schnickschnack" -->
<tr>
<td bgcolor=ccffcc><div align=center><font face=Arial,Helvetica,sans-serif>
<h2><font color=006600>Gästebuchverwaltung</h2><p>Um die Gästebucheinträge zu kommentieren, gilt es sich anzumelden<br>Bitte melde Dich an:</p></font></font>
EOF
#---Ausgabe der Anzahl "freier" Versuche zur Anmeldung
out '<p style="font:8pt">Verbleibende Versuche: ',3-($cnt++), '</p>';
 if ($cnt gt 3)
              {
        #---Schriptausgabe mit Sprung zu anderem Template, wenn 3 erfolglose Anmeldevers.
             out '<script>';
             out ' document.location="http://baseportal.de/cgi-bin/baseportal.pl?htx=/............"';
             out '</script>';
            }
#---- Ausgabe des Anmeldeformulares
out <<EOF;
<!-----Ausgabe bis zur Zeichenfolge EOF, hier jetzt das Anmeldeformular als solches -->
<form action="/cgi-bin/baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data" onSubmit="return form_check()">
<input type=hidden name="htx=" value="$htx">
<input type=hidden name="cnt=" value="$cnt">
</td></tr>
<tr><td bgcolor=#FFFFFF>
<div align=center>
<table>
<tr><td style="font:8pt Arial,Helvetica" bgcolor=#FFFFFF>Deine Hausnummer:</td><td style="font:8pt Arial,Helvetica"><input type="text" name="namerein="></td></tr>
<tr><td style="font:8pt Arial,Helvetica" bgcolor=#FFFFFF>Passwort:</td>
<td><input type="password" name="pwrein="></td></tr>
<tr><td></td><td><div align=center><input type=submit value="Anmelden"></div></td></tr>
</table></form>
</table>
</td></tr>
</div>
EOF

</perl>