mod "Login==!$LoginName", "$LastLogin:=jetzt", "login";
  if ($Status eq "root")
  {
    get "Login==*", "login";

    out '<br>
    <table border=0 cellspacing=1 cellpadding=4 width=500>
             <tr bgcolor=d0d0f0>
               <th><font size=1 face=arial,helvetica>', $_amount_all, '</th>
               <th colspan=5><font size=2 face=arial,helvetica>Benutzerprofile</th>
             </tr>
             <tr bgcolor=e0e0e0>
               <td><font size=2 face=arial,helvetica>Login:</td>
               <td><font size=2 face=arial,helvetica>Name:</td>
               <td><font size=2 face=arial,helvetica>Vorname:</td>
               <td><font size=2 face=arial,helvetica>Last Login:</td>
               <td><font size=2 face=arial,helvetica>Seit:</td>
               <td><font size=2 face=arial,helvetica>Logins:</td>
             </tr>';

    while (get_next("login"))
    {
      out '  <tr bgcolor=e0e0e0>
      <td align=left><font size=2 face=arial,helvetica>', $Login, '</td>
               <td align=left><font size=2 face=arial,helvetica><a href=mailto:', $Mail,'>', $Name, '</a></td>
               <td align=left><font size=2 face=arial,helvetica>', $Vorname, '</td>
               <td><font size=1 face=arial,helvetica>', datum($LastLogin, "Tag0.Monat0.Jahr Stunde:Minute"), '</td>
               <td align=right><font size=1 face=arial,helvetica>', datum($LoginsSeit, "Tag0.Monat0.Jahr"), '</td>
               <td align=right><font size=2 face=arial,helvetica>', $anzLogins, '</td>
             </tr>';
    }

    out '  </table>
           <br>';