Re: @Sander & Co Suchformular-Ausgabe - 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 Sander (8133 Beiträge) am Montag, 25.Juni.2001, 18:31.
    Re: @Sander & Co Suchformular-Ausgabe

      Du hast ein <perl> am Anfang zu viel.
      Ich hab mal den Code optimiert.
      <html>
      <head>
      <title>PC - Hilfe - Treiber - Ausbabe</title>
      </head>
      <body>
      <p align="center"><b><font color="#0000FF" size="4" face="Arial">Suchergebnisse</font></b></p>
      <center>
      <table border="2" width="100%" cellpadding="2" cellspacing="1">
      <tr>
      <td width="100%" valign="top" colspan="2" valign="middle" align="center">
      <perl>
      $append = "&Bereich~=$Bereich" if $Bereich ne "";
      $append = $append."&Name~=$Name" if $Name ne "";
      $append = $append."&Bezeichnung~=$Bezeichnung" if $Bezeichnung ne "";
      $append = $append."&Version~=$Version" if $Version ne "";
      $append = $append."&Datum~=$Datum" if $Datum ne "";
      $append = $append."&URL~=$URL" if $URL ne "";
      </perl>
      

      <loop code=perl db=/pc_hilfe/Treiber1/Daten>
      $ausgabe.="<tr><td><table border=0 width=100% valign=top><tr></tr></table></td><td <a valign=top><strong><font size=4><a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/pc_hilfe/Treiber1/Daten&cmd=all&Id==$_id>$Bereich</font></strong></a>, $Name, $Bezeichnung, <p>$Version, $Datum</td></tr><tr><td width=00% colspan=2><hr noshade size=3 color=008080></td></tr>";
      </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.pc-hilfe.claranet.de/private./hand_li.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.pc-hilfe.claranet.de/private/hand_re.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;

      out "</td></tr>$ausgabe<tr><td colspan=2 align=center>";
      

      out "<a href=\"$_link&range=$oldrange,$_range_length$append\"><img src=\"http://www.pc-hilfe.claranet.de/private/hand_li.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.pc-hilfe.claranet.de/private/hand_re.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;
      

      </perl>
      </td></tr>
      </table>
      <center>
      Bei dieser Suchanfrage wurden $_amount_query Datensätze gefunden
      </center>
      </body>
      </html>
      


    Ihre Antwort:

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

    Neuer Eintrag


 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Jogi (34 Beiträge) am Montag, 25.Juni.2001, 16:13.
    @Sander & Co Suchformular-Ausgabe

      Hallo Sander

      Erhalte in der Suchausgabe folgende Fehlermeldung:

      [ Fehler: (perl) in /pc_hilfe/Treiber1/ausgabe: glob trapped by operation mask at (eval 910) line 3. ]

      Leider finde ich keinen Fehler ??


      Dank

      Gruß Jogi

      <html>
      

      <head>
      <title>PC - Hilfe - Treiber - Ausbabe</title>
      

      </head>
      <body>
      <p align="center"><b><font color="#0000FF" size="4" face="Arial">Suchergebnisse</font></b></p>
      <center>
      <perl>
      

      <table border="2" width="100%" cellpadding="2" cellspacing="1">
      <tr>
      <td width="100%"  valign="top" colspan="2" valign="middle" align="center">
      

      <perl>
      $append = "&Bereich~=$Bereich" if $Bereich ne "";
      $append = $append."&Name~=$Name" if $Name ne "";
      $append = $append."&Bezeichnung~=$Bezeichnung" if $Bezeichnung ne "";
      $append = $append."&Version~=$Version" if $Version ne "";
      $append = $append."&Datum~=$Datum" if $Datum ne "";
      $append = $append."&URL~=$URL" if $URL ne "";
      </perl>
      <loop code=perl db=/pc_hilfe/Treiber1/Daten>
      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.pc-hilfe.claranet.de/private./hand_li.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.pc-hilfe.claranet.de/private/hand_re.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;

      </perl>
      
         </td> <loop db=/pc_hilfe/Treiber1/Daten>   <tr>     <td><table border="0" width="100%" valign="top">  <tr>

      </tr>
      </table>
      </td>
          <td <a valign="top"><strong><font size="4"><a href=\"http://baseportal.de/cgi-bin/baseportal.pl?htx=/pc_hilfe/Treiber1/Daten&cmd=all&Id==$_id\">$Bereich</font></strong></a>, $Name, $Bezeichnung, <p>$Version, $Datum</td>
        </tr>
        <tr>
          <td width="100%" colspan="2"><hr noshade size="3" color="#008080">
          </td>
        </tr>
      </loop>
      <tr><td colspan=2 align=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.pc-hilfe.claranet.de/private/hand_li.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.pc-hilfe.claranet.de/private/hand_re.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;

      </perl>
      

      </td></tr>
      </table>
      <center>
      <perl>
      out "Bei dieser Suchanfrage wurden $_amount_query Datensätze gefunden";
      </perl>
      </center>
      </body>
      </html>
      

     Antworten

    Beitrag von Sander (8133 Beiträge) am Montag, 25.Juni.2001, 18:31.
    Re: @Sander & Co Suchformular-Ausgabe

      Du hast ein <perl> am Anfang zu viel.
      Ich hab mal den Code optimiert.
      <html>
      <head>
      <title>PC - Hilfe - Treiber - Ausbabe</title>
      </head>
      <body>
      <p align="center"><b><font color="#0000FF" size="4" face="Arial">Suchergebnisse</font></b></p>
      <center>
      <table border="2" width="100%" cellpadding="2" cellspacing="1">
      <tr>
      <td width="100%" valign="top" colspan="2" valign="middle" align="center">
      <perl>
      $append = "&Bereich~=$Bereich" if $Bereich ne "";
      $append = $append."&Name~=$Name" if $Name ne "";
      $append = $append."&Bezeichnung~=$Bezeichnung" if $Bezeichnung ne "";
      $append = $append."&Version~=$Version" if $Version ne "";
      $append = $append."&Datum~=$Datum" if $Datum ne "";
      $append = $append."&URL~=$URL" if $URL ne "";
      </perl>
      

      <loop code=perl db=/pc_hilfe/Treiber1/Daten>
      $ausgabe.="<tr><td><table border=0 width=100% valign=top><tr></tr></table></td><td <a valign=top><strong><font size=4><a href=http://baseportal.de/cgi-bin/baseportal.pl?htx=/pc_hilfe/Treiber1/Daten&cmd=all&Id==$_id>$Bereich</font></strong></a>, $Name, $Bezeichnung, <p>$Version, $Datum</td></tr><tr><td width=00% colspan=2><hr noshade size=3 color=008080></td></tr>";
      </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.pc-hilfe.claranet.de/private./hand_li.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.pc-hilfe.claranet.de/private/hand_re.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;

      out "</td></tr>$ausgabe<tr><td colspan=2 align=center>";
      

      out "<a href=\"$_link&range=$oldrange,$_range_length$append\"><img src=\"http://www.pc-hilfe.claranet.de/private/hand_li.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.pc-hilfe.claranet.de/private/hand_re.gif\" width=\"40\" height=\"40\" border=0 alt=\"weiter\"></a>" if $newrange<$_amount_query;
      

      </perl>
      </td></tr>
      </table>
      <center>
      Bei dieser Suchanfrage wurden $_amount_query Datensätze gefunden
      </center>
      </body>
      </html>
      

     Antworten


     
 Liste der Einträge von 60751 bis 60901: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.10s by baseportal.de
Erstellen Sie Ihre eigene Web-Datenbank - kostenlos!