<loop code=perl db=daten>
if($namerein ne "")
{
  get "Login==!$namerein", "nutzerdb", "logincheck";

  if($Passwort ne "" && $Passwort eq $pwrein && $Recht eq "1")
  {
    out "<tr><td>$Bereich</td>";
    out "<td>";
    out "<a href='$Link&cmd=do_all&namerein=$namerein&pwrein=$pwrein'>ändern</a>";
    out "</td>";
    out "</tr></table>";

                   }elsif ($Recht eq "2")
                   {

    out "<tr><td>$Bereich</td>";
    out "<td>";
    out "<a href='$Link&cmd=do_all&namerein=$namerein&pwrein=$pwrein'>ändern</a>";
    out "</td>";
    out "</tr></table>";

  } else
  {
    out "<b><font color=FF0000>Anmeldung fehlgeschlagen!</font></b>";
    $namerein="";
  }
}
</loop>