Blätterfunktion/bei auslesen mit get/while - 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 Jürgen (614 Beiträge) am Montag, 4.Februar.2002, 13:51.
    Blätterfunktion/bei auslesen mit get/while

      Hi Leute,

      hab ein Datenbank die über Perl (get/while) ausgelesen
      wird. Jetzt funzt aber die Blätterfunktion nicht mehr.
      Warum ??
      Auslese Perlcode: $Sucha und $Suchb werden über Formular übergeben.
      <perl>
      get "Firmenname~=$Sucha FirmenPLZ~=$Suchb Freigegeben==1 sort=FirmenPLZ range=0,50", "meineDB";
      while(get_next "meineDB")
      {
      $Firmenort = substr($Firmenort,0,15,0);
      $Firmenname = substr($Firmenname,0,45,0);
      

      out <<EOF;
      ...html

      Auflistkriterien sind da ($Sucha und $Suchb),
      aber es ist nicht mehr möglich den Datensatz weiter zu
      blättern. Erscheinen immer nur die ersten 50 Datensätze.
      Wer kann mir helfen. Hier meine Blätterfunktion:

      <perl>
      

      unless ($_amount_query)
      {
      out "<H1>Keine Einträge mit den Suchkriterie  \" $Sucha,  $Suchb \"  in unserer Datenbank gefunden!!</H1><center><b><a href=\"http://meineDomain/search.html\">Zurück zur Suchseite</a></b></center>";
      } else
      {
      out "<center><b><a href=\"http://meineDomain/search.html\">Zurück zur Suchseite</a></b></center>";
      }
      

      $append="&Sucha=".convert_url($Sucha) if ($Sucha);
      $append.="&Suchb=".convert_url($Suchb) if ($Suchb);
      

      if ($_amount != 0)
      {
      $bis = $_range + $_range_length;
          $von = $_range + 1;
      out "<H5>Einträge $von bis \n";
              if ($bis < $_amount_query)
             {
      out "$bis von $_amount_query\n";
             }
          else
             {
              out "$_amount_query von $_amount_query</5>";
             }
        }
       
      my $newrange=$_range+$_range_length;
      my $oldrange=$_range-$_range_length;
      

      $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;

      out "<p>[ <a href=\"$_link&range=$oldrange,$_range_length$append\">Vorherige Einträge</a> ] " if $oldrange>=0;
      out "[ <a href=\"$_link&range=$newrange,$_range_length$append\">Weitere Einträge</a> ]" if $newrange<$_amount_query;
      

      </perl>

      Gruß Jürgen


    Ihre Antwort:

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

    Neuer Eintrag


 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Jürgen (614 Beiträge) am Montag, 4.Februar.2002, 13:51.
    Blätterfunktion/bei auslesen mit get/while

      Hi Leute,

      hab ein Datenbank die über Perl (get/while) ausgelesen
      wird. Jetzt funzt aber die Blätterfunktion nicht mehr.
      Warum ??
      Auslese Perlcode: $Sucha und $Suchb werden über Formular übergeben.
      <perl>
      get "Firmenname~=$Sucha FirmenPLZ~=$Suchb Freigegeben==1 sort=FirmenPLZ range=0,50", "meineDB";
      while(get_next "meineDB")
      {
      $Firmenort = substr($Firmenort,0,15,0);
      $Firmenname = substr($Firmenname,0,45,0);
      

      out <<EOF;
      ...html

      Auflistkriterien sind da ($Sucha und $Suchb),
      aber es ist nicht mehr möglich den Datensatz weiter zu
      blättern. Erscheinen immer nur die ersten 50 Datensätze.
      Wer kann mir helfen. Hier meine Blätterfunktion:

      <perl>
      

      unless ($_amount_query)
      {
      out "<H1>Keine Einträge mit den Suchkriterie  \" $Sucha,  $Suchb \"  in unserer Datenbank gefunden!!</H1><center><b><a href=\"http://meineDomain/search.html\">Zurück zur Suchseite</a></b></center>";
      } else
      {
      out "<center><b><a href=\"http://meineDomain/search.html\">Zurück zur Suchseite</a></b></center>";
      }
      

      $append="&Sucha=".convert_url($Sucha) if ($Sucha);
      $append.="&Suchb=".convert_url($Suchb) if ($Suchb);
      

      if ($_amount != 0)
      {
      $bis = $_range + $_range_length;
          $von = $_range + 1;
      out "<H5>Einträge $von bis \n";
              if ($bis < $_amount_query)
             {
      out "$bis von $_amount_query\n";
             }
          else
             {
              out "$_amount_query von $_amount_query</5>";
             }
        }
       
      my $newrange=$_range+$_range_length;
      my $oldrange=$_range-$_range_length;
      

      $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;

      out "<p>[ <a href=\"$_link&range=$oldrange,$_range_length$append\">Vorherige Einträge</a> ] " if $oldrange>=0;
      out "[ <a href=\"$_link&range=$newrange,$_range_length$append\">Weitere Einträge</a> ]" if $newrange<$_amount_query;
      

      </perl>

      Gruß Jürgen

     Antworten

    Beitrag von Sander (32 Beiträge) am Montag, 4.Februar.2002, 14:01.
    Re: Blätterfunktion/bei auslesen mit get/while

      erst lief es über loop?

      bei get funzt das mit dem Range nicht ganz - glaub ich.

      Ich habe mir mal damit beholfen, nur den Startwert zu übergeben und den Schrittwert fest einzustellen:

      $v=$v|0;  # $v mit 0 belegen, wenn leer
      get "... range=$v,10"; # 10er Schritten...
      

      und im Link schickst du dann statt range=$newrange,$_range_length
      v=$newrang oder $oldrange mit

      Sander

     Antworten

    Beitrag von Jürgen (614 Beiträge) am Montag, 4.Februar.2002, 15:38.
    Re: Blätterfunktion/bei auslesen mit get/while

      Hi Sander,

      funzt nich :-((
      Habs so gemacht, wie du es beschrieben hast:

      <perl>
      $v=$v|0;
      get "Firmenname~=$Sucha FirmenPLZ~=$Suchb Freigegeben==1 sort=FirmenPLZ range=$v,10", "meineDB";
      while(get_next "meineDB")
      {
      $Firmenort = substr($Firmenort,0,15,0);
      $Firmenname = substr($Firmenname,0,45,0);
      
      ...

      $append="&Sucha=".convert_url($Sucha) if ($Sucha);
      $append.="&Suchb=".convert_url($Suchb) if ($Suchb);
      

      if ($_amount != 0)
      {
      $bis = $_range + $_range_length;
          $von = $_range + 1;
      out "<H5>Einträge $von bis \n";
              if ($bis < $_amount_query)
             {
      out "$bis von $_amount_query\n";
             }
          else
             {
              out "$_amount_query von $_amount_query</5>";
             }
        }
       
      my $newrange=$_range+$_range_length;
      my $oldrange=$_range-$_range_length;
      

      $oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;

      out "<p>[ <a href=\"$_link&v=$oldrange,$_range_length$append\">Vorherige Einträge</a> ] " if $oldrange>=0;
      out "[ <a href=\"$_link&v=$newrange,$_range_length$append\">Weitere Einträge</a> ]" if $newrange<$_amount_query;
      

      </perl>

      Jupp, Ausgabe sind 10, aber Weiterblätter auch nicht möglich.

      Gruß Jürgen

     Antworten

    Beitrag von Sander (8133 Beiträge) am Montag, 4.Februar.2002, 17:40.
    Re: Blätterfunktion/bei auslesen mit get/while

      Das ,$_range_length im Link ist noch zuviel

      Sander

     Antworten

    Beitrag von Jürgen (614 Beiträge) am Dienstag, 5.Februar.2002, 01:02.
    Re: Blätterfunktion/bei auslesen mit get/while

      Hi Sander,

      ändert auch nichts an der Situation. Kein Weiterblättern möglich. Bin am verzweifeln. :-((

      Gruß
      Jürgen

     Antworten

    Beitrag von Jürgen (614 Beiträge) am Dienstag, 5.Februar.2002, 15:50.
    Re: Blätterfunktion/bei auslesen mit get/while

      Hi Sander,

      ich bins nochmal Blätterfunktion/bei auslesen mit get/while (Jürgen)

      Ich komm zu keinem Ergebnis. Vieleicht fällt dir ja noch was anderes ein. Hab schon einiges probiert, aber ??? ist nichts dabei rausgekommen.

      Gruß Jürgen

     Antworten

    Beitrag von Sander (8133 Beiträge) am Dienstag, 5.Februar.2002, 16:59.
    Re: Blätterfunktion/bei auslesen mit get/while

      ne, fällt mir nix mehr dazu ein.

      Sander

     Antworten


     
 Liste der Einträge von 50700 bis 50850: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


Zurück zur Homepage

© baseportal.de. Alle Rechte vorbehalten. Nutzungsbedingungen



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