baseportal | |||
English - Deutsch | "Es gibt keine dummen Fragen - jeder hat einmal angefangen" | ||
|
Ausgewählter Eintrag: | Zur Liste |
Alle Einträge zum Thema: | Zur Liste |
<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>$Titel</b><br>$Beschreibung - $Kommentar<p> 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) { $txt="Suche nach weiteren Treffern"; $newrange=$_fullsearch_match_pos; } else { out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1; $txt="Suche in weiteren Datensätzen"; } if($newrange<$_amount_all) { 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>
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data"><input type="hidden" name="htx=" value="$htx">Volltextsuche: <input type="text" name="_fullsearch~~" value="$_fullsearch"><input type="submit" value="Volltextsuche"></form> </FONT>
return if $_fullsearch eq "";
while(get_next) { $out= <<EOF; <b>$Titel</b><br>$Beschreibung - <p> EOF $out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g; out $out; }
my $txt;
{ $txt="Suche nach weiteren Treffern"; $newrange=$_fullsearch_match_pos; } else { out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1; $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>
get "fullsearch_match=10", "hier muß man übrigens den Namen der Datenbank reinschreiben....;-)"; while(get_next "hier muß man übrigens den Namen der Datenbank reinschreiben....;-)")
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data"><input type="hidden" name="htx=" value="$htx">Volltextsuche: <input type="text" name="_fullsearch~~" value="$_fullsearch"><input type="submit" value="Volltextsuche"></form> </FONT> <perl> return if $_fullsearch eq "";
while(get_next "DPLX")
$out= <<EOF; <b>$frueh_1</b><br>$spaet_4 - <p> EOF $out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g; out $out; } my $newrange=$_fullsearch_range+$_fullsearch_range_length; my $txt;
{$txt="Suche nach weiteren Treffern"; $newrange=$_fullsearch_match_pos;
{out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1; $txt="Suche in weiteren Datensätzen";
if($newrange<$_amount_all) {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>";
{ out "Die Datenbank wurde komplett durchsucht."; } </perl>
EOF steht einsam und alleine in der Zeile...(s.u.) danke für den Tip mit dem Dateinamen bei get, (s.u) ich habe es eingetragen.....
<form action="baseportal.pl?htx=$htx" method="post" enctype="multipart/form-data"><input type="hidden" name="htx=" value="$htx">Volltextsuche: <input type="text" name="_fullsearch~~" value="$_fullsearch"><input type="submit" value="Volltextsuche"></form> </FONT>
return if $_fullsearch eq "";
while(get_next "DPLX")
$out= <<EOF; <b>$frueh_1</b><br>$spaet_4 - <p>
$out=~ s#$_fullsearch_regex#<b><font color=red>$1</font></b>#g; out $out; } my $newrange=$_fullsearch_range+$_fullsearch_range_length; my $txt;
{$txt="Suche nach weiteren Treffern"; $newrange=$_fullsearch_match_pos;
{out "<b>Kein Treffer.</b><p>" if $_fullsearch_amount<1; $txt="Suche in weiteren Datensätzen";
if($newrange<$_amount_all) {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>";
{ out "Die Datenbank wurde komplett durchsucht."; } </perl>
Liste der Einträge von 40500 bis 40650: | 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 |