<!-- Ausgabe Anfang --->
<p>Stadt und Ortsteil-Datenbank</p>
<loop db=datenbankname Stadt==Koblenz sort^=Stadt,Ortsteil range=0,3>
<p>
$Stadt<br>
$Ortsteil<br>
$Text<br>
$Beschreibung
<hr>
</p>
</loop>
<!-- Ausgabe Ende --->
<perl>
# neu blättern-Zeichen
my $newrange=$_range+$_range_length;
my $oldrange=$_range-$_range_length;
$oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;
out "<< <a href=\"$_link&range=$oldrange,$_range_length\"onmouseover='window.status=\"nächste Orte\";return true;'onmouseout='window.status=\"Stadt und Ortsteil-Datenbank\";return true;'onmousedown='window.status=\"Stadt und Ortsteil-Datenbank\";return true;'><font color=\"yellow\"><b>nächste Orte</a></b></font> " if $oldrange>=0;
out " <a href=\"$_link&range=$newrange,$_range_length\"onmouseover='window.status=\"vorhergehende Orte\";return true;'onmouseout='window.status=\"Stadt und Ortsteil-Datenbank\";return true;'onmousedown='window.status=\"Stadt und Ortsteil-Datenbank\";return true;'><font color=\"yellow\"><b>vorhergehende Orte</a></b></font> >>" if $newrange<$_amount_query;
# neu blättern-Zeichen
</perl>
<!-- Blättern Ende --->