Beitrag von sascha (539 Beiträge) am Montag, 18.August.2003, 21:19.
immer noch probs mit blättern in perl
hallo,
ich habe immer noch ein problem mit dem blättern in <perl>.
wenn ich über das formular eine abfrage mache (mit range=0,5)
werden die ersten 5 auch angezeigt, ABER
wenn ich auf -weiter- klicke werden nicht die nächsten 5 angezeigt,
sondern die ersten 5 der db u.s.w.
ich benutze das <perl> aus der doku.
sascha
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\"><FONT COLOR=\"#0C2545\" SIZE=\"-2\" FACE=\"Verdana\">Zurück</a> " if $oldrange>=0;
out "<a href=\"$_link&range=$newrange,$_range_length\"><FONT COLOR=\"#0C2545\" SIZE=\"-2\" FACE=\"Verdana\">Weiter</a>" if $newrange<$_amount_query;
</perl>
Antworten
Beitrag von herbert (385 Beiträge) am Montag, 18.August.2003, 22:01.
Re: immer noch probs mit blättern in perl
Antworten
Beitrag von Sander (8133 Beiträge) am Montag, 18.August.2003, 22:26.
Re: immer noch probs mit blättern in perl
hast du das dach mit in range reingenommen?
range^=0,5
Sander
Antworten
Beitrag von sascha (539 Beiträge) am Dienstag, 19.August.2003, 12:50.
Re: immer noch probs mit blättern in perl
hallo sander,
es klappt nicht.
wenn ich selektiere zeigt er mir die ersten 5 richtig an, die weiteren 5 sind dann pos. 5-10 der datenbank und nicht der selektierten.
bei abfrage mit formular, wenn die ersten 5 richtig angezeigt werden ist bei range das dach mit drin.
gehe ich mit der maus auf den "weiter" button zum blättern, erscheint in der statuszeile der blätter link ohne dach beim range.
liegt es vielleicht daran?
bloß wo muß ich dann im <perl> das dach setzen??
sascha
ich habe das dach im loop:
<loop db=daten range^=0,5>
nach dem <loop> kommt folgendes <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\"><FONT COLOR=\"#0C2545\" SIZE=\"-2\" FACE=\"Verdana\">Zurück</a> " if $oldrange>=0;
out "<a href=\"$_link&range=$newrange,$_range_length\"><FONT COLOR=\"#0C2545\" SIZE=\"-2\" FACE=\"Verdana\">Weiter</a>" if $newrange<$_amount_query;
</perl>
auf die listenseite, wo ich mit <loop> abfrage greife ich mit folgenden <form> zu:
<form action="baseportal.pl?htx=/name/verzeichnis/templatename&cmd=search&range^=0,5" method="post" enctype="multipart/form-data">
<input type=hidden name="htx=" value="/name/verzeichnis/templatename">
<input type=hidden name="db=" value="datenbankname">
<input type=hidden name="cmd=" value="search">
Antworten
Beitrag von sascha (539 Beiträge) am Dienstag, 19.August.2003, 20:46.
Re: immer noch probs mit blättern in perl >;-(
hallo,
habe was mit $append in der bib gefunden, bin mir aber nicht sicher, ob ich auf den richtigen weg bin.
mit append baue ich doch die felder ein, über die ich mit meinem formular
auf das template mit dem <loop> abfrage?
frage ich aber z.b. mit kategorie ab, klappt das auch nicht :-(
ich will doch NUR in meiner blätterfunktion, daß bei einer selektierten abfrage nur durch die selektierten einträge geblättert wird.
ich dachte nicht, daß dies so ein problem sein würde.
sascha
<loop db=daten range^=0,5>
</loop>
<perl>
$append = "&Land~=$Land" if $Land ne "";
$append = $append."&PLZ~=$PLZ" if $PLZ ne "";
$append = $append."&Kategorie~=$Kategorie" if $Kategorie ne "";
</perl>
<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$append\">zurück></a> " if $oldrange>=0;
out "<a href=\"$_link&range=$newrange,$_range_length$append\">weiter</a>" if $newrange<$_amount_query;
Antworten
Beitrag von Sander (8133 Beiträge) am Dienstag, 19.August.2003, 22:34.
Re: immer noch probs mit blättern in perl >;-(
is der richtige weg:
<perl>
$append = "&Land~=$_sel{Land}" if $_sel{Land} ne "";
$append = $append."&PLZ~=$_sel{PLZ}" if $_sel{PLZ} ne "";
$append = $append."&Kategorie~=$_sel{Kategorie}" if $_sel{Kategorie} ne "";
</perl>
<loop db=daten range^=0,5>
</loop>
<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$append\">zurück></a> " if $oldrange>=0;
out "<a href=\"$_link&range=$newrange,$_range_length$append\">weiter</a>" if $newrange<$_amount_query;
</perl>
Sander
Antworten
Beitrag von sascha (539 Beiträge) am Dienstag, 19.August.2003, 23:24.
Re: immer noch probs mit blättern in perl >;-(
hallo sander,
DANKE - soweit funzt es.
ich hab heute soviel über das prob im forum gelesen und ausprobiert, ohne zu wissen was ich tue und jetzt ist es so einfach :-)
2 fragen habe ich noch:
1.) ein suchfeld ist mit bindestrich. wie definiere ich denn das?
$append = $append."&Hotel-Kooperation~=$_sel{Hotel-Kooperation}" if $_sel{Hotel-Kooperation} ne "";
2.) im selben suchtemplate habe ich noch eine volltextsuche, die als zieltemplate die selbe ausgabeseite hat, doch hier funktioniert das wieder nicht.
muss ich das im $append auch einbauen?
meine volltextsuche:
<form action="baseportal.pl?htx=/name/verzeichniss/template&sort=-Id" method="post" enctype="multipart/form-data">
<input type=hidden name="htx=" value="/name/verzeichniss/template">
<input type=hidden name="db=" value="daten">
<input type="text" name="_fullsearch~~" value="$_fullsearch">
<input type="submit" value="Suchen">
</form>
sascha
Antworten
Beitrag von Sander (8133 Beiträge) am Dienstag, 19.August.2003, 23:50.
Re: immer noch probs mit blättern in perl >;-(
Antworten
Beitrag von sascha (539 Beiträge) am Mittwoch, 20.August.2003, 00:02.
:-) danke
hi,
super - bindestrich-problem gelöst.
das mit der volltextsuche schieb ich erstmal, aber
gibt es denn eine möglichkeit, die blätterfunktion
im ausgabetemplate bei der abfrage durch die volltextsuche
zu ignorieren?
aber erstmal vielen dank - du hast mich kurz vor dem perl-exodus
bewahrt.
gute nacht
sascha
Antworten
