<do action=input><do action=list listtype=add> <loop db=main sort=- range^=0,20> 
            <p>  
            <hr>
            <table width="100%" border="0" cellspacing="2" cellpadding="4">
              <tr> 
                <td rowspan="3" width="16%" valign="top">
                  <p><font face="Verdana, Arial, Helvetica, sans-serif" size="2">$Datum</font></p>
                  <p><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Eintrag 
                    Nr.<br>
                    $_id</font></p>
                </td>
                <td width="84%" bgcolor="#C6D7E1"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">$Name</font></td>
              </tr>
              <tr> 
                <td width="84%"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">$Beitrag</font></td>
              </tr>
              <tr> 
                <td width="84%" bgcolor="#C6D7E1"> 
                  <table width="100%" border="0" cellspacing="0" cellpadding="0">
                    <tr> 
                      <td width="18%"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">Homepage:<br>
                        E-Mail:<br>
                        </font></td>
                      <td width="82%" valign="top"><font face="Verdana, Arial, Helvetica, sans-serif" size="2">$Homepage<br>$_loop{"E-Mail"}</font></td>
                    </tr>
                  </table>
                  
                </td>
              </tr>
            </table>
</loop>
<hr>
<font face="Verdana, Arial, Helvetica, sans-serif" size="2">
            <perl> 
my $newrange=$_range+$_range_length; $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;

out "[ <a href=\"$_link&range=$newrange,$_range_length\">Weitere Beiträge</a> ]" if $newrange<$_amount_all;
 </perl> 
</font>