Hallo,
mit der Volltextsuche taucht dann ein kleines Problem auf, wenn das gesuchte Wort in einem aktiven Link enthalten ist und gleich rot markiert wird.
Wenn man dann den markierten Link anklickt kommt bloß Quatsch raus. Er findet dann diese Formatierung <b><font color=red>$1</font></b> und packt sie zu dem Link.
Hier ist das Template: http://rathaus-buerstadt.de/baseportal/Linkliste
Mal mit dem Wort "bmu" suchen dann wirds klar.
Danke für Tipps
Gruß
Micha
das iste der komplette Code
<html><head><title></title>
</head><body bgcolor="#ffffff">
<include src=style>
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data">
<input type="hidden" name="htx=" value="$htx">
<font size=2 face=verdana>Volltextsuche:</font> <input type="text" name="_fullsearch~~" value="$_fullsearch">
<input type="submit" value="Suchen">
</form>
<perl>
return if $_fullsearch eq "";
get "fullsearch_match=10";
while(get_next)
{
$out.=<<EOF;
<b><font size=2 face=verdana>$Name, $Bezeichnung, $Ort</b></font><br><font size=1 face=verdana,arial,helvetica>Tagesordnung:<br>
<img src="http://www.rathaus-buerstadt.de/bilder/titelpfeil.gif" width="7" height="9" align="absmiddle">Internet:<a href="http://$URL">$URL</a></font></p><hr></font>
EOF
}
$out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g;
if ($_fullsearch_amount<1)
{
out "<font size=2 face=verdana, arial><b>Ihre Suchabfrage ergab leider keinen Treffer.</b></font><p>";
} else
{
out "<font size=2 face=verdana, arial><b>Ihre Suchanfrage ergab $_fullsearch_amount Treffer (rot markiert)</b></font><p><hr>";
}
out $out;
my $newrange=$_fullsearch_range+$_fullsearch_range_length;
my $txt;
if($_fullsearch_match_pos<$newrange)
{
$txt="Suche nach weiteren Treffern";
$newrange=$_fullsearch_match_pos;
} else
{
$txt="Suche in weiteren Datensätzen";
}
if($newrange<$_amount_all)
{
out "<font size=2 face=verdana, arial>Es wurde noch nicht in allen Datensätzen gesucht:</font>";
out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>";
} else
{
out "<font size=2 face=verdana, arial>Die Datenbank wurde komplett durchsucht.<br><br></font>";
}
$_fullsearch_amount;
</perl>
<perl>
get "Id==* sort=Kategorie range=0,10", "Linkliste";
while(get_next("Linkliste"))
{
out "<br><table width=\"75%\" border=\"0\" cellspacing=\"0\" cellpadding=\"0\">
<tr>
<td bgcolor=#FF9900><font face=verdana, arial font size=2><b>Kategorie: $Kategorie<br></b></font></td>
</tr>
</table>" if $Kategorie ne $Kategorie_alt;
out "<blockquote>
<font face=verdana, arial font size=2>$Beschreibung<br><font>";
out "<font face=verdana, arial font size=2><img src=\"http://www.rathaus-buerstadt.de/bilder/titelpfeil.gif\" width=\"9\" height=\"12\" align=\"absmiddle\"> Internet:<a href=http://$URL target=\"_blank\">$URL</a></font><br></blockquote>";
$Kategorie_alt=$Kategorie;
}
</perl>
<p align="center"> <font face="Verdana, Arial, Helvetica, sans-serif" size="2">
<perl>
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\">Zurück</a> " if $oldrange>=0;
out "<a href=\"$_link&range=$newrange,$_range_length\">Weiter</a> >>" if $newrange<$_amount_query;
</perl>
</font>
<include src=footer>
</p>
</body></html>
