Re: Blättern - baseportal Forum - Web-Anwendungen einfach, schnell, leistungsfähig!
baseportal
English - Deutsch "Es gibt keine dummen Fragen - jeder hat einmal angefangen"

 baseportal-ForumDie aktuellsten 10, 30, 50, 100 Einträge anzeigen.  

 
 Ausgewählter Eintrag: Zur Liste 
    Beitrag von Michael Koch (344 Beiträge) am Dienstag, 12.März.2002, 21:22.
    Re: Blättern

      Hier ein Quellkode den du nucg noch anpassen mußt:
      <html>

      <head>
      <title>neue oder geänderte Datensätze</title>
</head>
<LINK href="http://www.brueckenbau-links.de/bblinks.css" rel=styleSheet type=text/css>
<body>
<h2>Die neuen oder geänderten Datensätze der Brückendatenbank</h2>
<center>

      <center>
      <loop code=perl db=brueckenbau range^=0,10>
out "";
</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\"><img src=\"http://www.brueckenbau-links.de/links.gif\" width=\"40\" height=\"40\" border=0 alt=\"zurück\"></a> " if $oldrange>=0;
      out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;
     </perl>
<table border="0" width="100%">
<loop code=perl db=brueckenbau sort=-Datum,Brueckenname range^=0,10>

      out <<EOF;
       <tr>
    <td valign="top"><font color="#800000">$Datum</font></td>
    <td valign="middle" bgcolor="#EBEBEB"><big><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</a></big> von <a href="$EigentuemerLink" target="_blank">$SeitenEigentuemer</a>
    </td>
  </tr>

        <tr>
    <td>&nbsp;</td>
    <td><a href="$BildLinkSeite" target="_blank"><img src="$BildvorschauLink" border=0 align=left hspace=5 vspace=5
          
           alt="$Brueckenname"></a>
$Land, $Stadt, $Lage, $VerkehrswegOben, $VerkehrswegUnten<br>$Beschreibung<br><font color="#800000">$Kommentar</font>

      </td>

        </tr>
EOF
</loop>
</table>

      <center>
      <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\"><img src=\"http://www.brueckenbau-links.de/links.gif\" width=\"40\" height=\"40\" border=0 alt=\"zurück\"></a> " if $oldrange>=0;
      out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;
     </perl>

      </center>
      </body>
</html>

      Die Blätterfunktion ist vor und nach dem Loop.
      Die Links und die Datenbank sachen mußt du noch ändern.


    Ihre Antwort:

    Name: EMail: EMail bei Antwort? WWW:
    Titel:
    Text:

    Neuer Eintrag


 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Michael K. (18 Beiträge) am Dienstag, 12.März.2002, 20:14.
    Blättern

      Hallo zusammen,

      hab mir den Beispielcode zum Blättern aus der Basportal Doku in meine Ausgabeseite kopiert. Leider funktioniert das nicht. Bin leider nicht wirklich fit in Perl. Die Ausgabeseite verwendet zum Ausgeben den Loop Befehl von BP:

      <loop db=adressen sort=- range=0,20>

      Jetzt hab ich unter dem </loop> den Code aus der Dokumentation eingefügt. Leider kommen immer wieder die selben 20 Datensätze. Funktioniert der Code überhaupt mit der Loop Methode oder was genau muß ich noch anpassen?

      Viele Dank für eine Antwort :-)

      Grüße

      Michael

     Antworten

    Beitrag von Michael Koch (344 Beiträge) am Dienstag, 12.März.2002, 21:22.
    Re: Blättern

      Hier ein Quellkode den du nucg noch anpassen mußt:
      <html>

      <head>
      <title>neue oder geänderte Datensätze</title>
</head>
<LINK href="http://www.brueckenbau-links.de/bblinks.css" rel=styleSheet type=text/css>
<body>
<h2>Die neuen oder geänderten Datensätze der Brückendatenbank</h2>
<center>

      <center>
      <loop code=perl db=brueckenbau range^=0,10>
out "";
</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\"><img src=\"http://www.brueckenbau-links.de/links.gif\" width=\"40\" height=\"40\" border=0 alt=\"zurück\"></a> " if $oldrange>=0;
      out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;
     </perl>
<table border="0" width="100%">
<loop code=perl db=brueckenbau sort=-Datum,Brueckenname range^=0,10>

      out <<EOF;
       <tr>
    <td valign="top"><font color="#800000">$Datum</font></td>
    <td valign="middle" bgcolor="#EBEBEB"><big><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/brueckenbau/bruecke&cmd=all&Id==$_id\">$Brueckenname</a></big> von <a href="$EigentuemerLink" target="_blank">$SeitenEigentuemer</a>
    </td>
  </tr>

        <tr>
    <td>&nbsp;</td>
    <td><a href="$BildLinkSeite" target="_blank"><img src="$BildvorschauLink" border=0 align=left hspace=5 vspace=5
          
           alt="$Brueckenname"></a>
$Land, $Stadt, $Lage, $VerkehrswegOben, $VerkehrswegUnten<br>$Beschreibung<br><font color="#800000">$Kommentar</font>

      </td>

        </tr>
EOF
</loop>
</table>

      <center>
      <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\"><img src=\"http://www.brueckenbau-links.de/links.gif\" width=\"40\" height=\"40\" border=0 alt=\"zurück\"></a> " if $oldrange>=0;
      out "<a href=\"$_link&range=$newrange,$_range_length$append\"><img src=\"http://www.brueckenbau-links.de/rechts.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;
     </perl>

      </center>
      </body>
</html>

      Die Blätterfunktion ist vor und nach dem Loop.
      Die Links und die Datenbank sachen mußt du noch ändern.

     Antworten

    Beitrag von Sander (8133 Beiträge) am Dienstag, 12.März.2002, 22:31.
    Re: Blättern

      ja, der funzt.
      bei range muß noch ein Dach mit rein

      range^=0,20

      damit die url-params vorfahrt haben ;-)

      Sander

     Antworten

    Beitrag von Michael K. (18 Beiträge) am Mittwoch, 13.März.2002, 09:27.
    Re: Blättern

      Vielen Dank :-)

      Ich weis nicht warum, aber es funktioniert. Danke für die schnelle Hilfe.

      Viele Grüße

      Michael

     Antworten


     
 Liste der ersten 150 Einträge:Einklappen Zur Eingabe 
 Zur Eingabe  > Ältere Einträge | 2 | 3 | 4 | 5 | 6 | 7 | 8 | 9 | 10 >> Älteste Einträge

Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



powered in 0.10s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!