baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
<html>
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data"> <input type="hidden" name="htx=" value="$htx"> Freie Suche: <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>$Titel</b></font><br><font size=1 face=verdana,arial,helvetica>$Text <br> $Autor</font><p><hr> EOF $out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g; out $out; } my $newrange=$_fullsearch_range+$_fullsearch_range_length; my $txt; if($_fullsearch_match_pos<$newrange) {
$newrange=$_fullsearch_match_pos; } else {
$txt="Suche in weiteren Datensätzen"; }
{ out "Es wurde noch nicht in allen Datensätzen gesucht: "; out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>"; } else { out "Die Datenbank wurde komplett durchsucht."; } </perl> <br> <loop sort^=Titel range^=0,7> <tr bgcolor="#CCCCCC" bordercolor="#FFFFFF" align="left">
<td width="10%"> <font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href=$Linkmitarbeiter>$Autor</a></font></td> </tr> </loop>
|
Alle Einträge zum Thema: | Zur Liste |
<html>
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data"> <input type="hidden" name="htx=" value="$htx"> Freie Suche: <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>$Titel</b></font><br><font size=1 face=verdana,arial,helvetica>$Text <br> $Autor</font><p><hr> EOF $out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g; out $out; } my $newrange=$_fullsearch_range+$_fullsearch_range_length; my $txt; if($_fullsearch_match_pos<$newrange) {
$newrange=$_fullsearch_match_pos; } else {
$txt="Suche in weiteren Datensätzen"; }
{ out "Es wurde noch nicht in allen Datensätzen gesucht: "; out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>"; } else { out "Die Datenbank wurde komplett durchsucht."; } </perl> <br> <loop sort^=Titel range^=0,7> <tr bgcolor="#CCCCCC" bordercolor="#FFFFFF" align="left">
<td width="10%"> <font face="Verdana, Arial, Helvetica, sans-serif" size="2"><a href=$Linkmitarbeiter>$Autor</a></font></td> </tr> </loop>
out "<a href=\"baseportal.pl?htx=$htx&_fullsearch~~".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>";
out "<a href=\"baseportal.pl?htx=$htx&_fullsearch==".convert_url($_fullsearch). "&fullsearch_range=$newrange,$_fullsearch_range_length\">$txt</a>";
out "<a href=\"baseportal.pl?htx=$htx&suchbegriffe=".convert_url($_fullsearch). das htx gegen ein anderes Template ausgetauscht, wo die unmodifizierte Volltextsuche drinsteht, dann klappt es mit den weiteren Suchvorgängen.Ist ziemlich umständlich und sicher mehr als unprofessionell, konnte leider nicht besser...
out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1; muß hinter die while get_next()-schleife denk ich mal.
my $newrange=$_fullsearch_range+$_fullsearch_range_length;
Liste der Einträge von 48000 bis 48075: | Einklappen | Zur Eingabe |
Neueste Einträge << 10 | 9 | 8 | 7 | 6 | 5 | 4 | 3 | 2 | Neuere Einträge < | Zur Eingabe | > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge |
© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen |