Re: ein beispiel - 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 sebastian (533 Beiträge) am Donnerstag, 10.Juli.2003, 11:39. WWW: uni-fit.de
    Re: ein beispiel

      hallo till, wenn ich dein perl kopiere und bei mir einfüge, die ausgabeseite weglasse, FUNKTIONIERT ES. DANKE. Warum das andere nicht geht, bleibt wahrscheinlich eine der ungelösten fragen dieser erde. vielen dank für deine hilfe.

      sebastian


    Antworten

 Alle Einträge zum Thema: Zur Liste 
    Beitrag von Sebastian (0 Beiträge) am Donnerstag, 10.Juli.2003, 10:47. WWW: uni-fit.de
    DRINGEND HILFE ERBETEN

      Sitze jetzt fast schon 2 Tage an dieser Blätter-Funktion und stehe kurz vor dem Wahnsinn. WO MACHE ICH DEN FEHLER - so dass beim blättern die datensätz nicht wechseln ?


      Hier die URL zum schauen : http://unifit-daten.de/baseportal/2003/katalysatoren/neu_kat_Kopie

      Hier der Quelltext zum schauen:

      <html><head><title>UNI-FIT Katalysatoren</title>
</head><body bgcolor="#ffffff">
<STYLE TYPE="text/css">
a:link { font-weight:bold; color:#2B75B3; text-decoration:none }
a:visited { font-weight:bold; color:#000080; text-decoration:none }
a:hover { font-weight:bold; color:#E00000; text-decoration:none }
a:active { font-weight:bold; color:#E00000; text-decoration:underline }
a:focus { font-weight:bold; color:#2B75B3; text-decoration:underline }
</STYLE>
<center>
 

      <loop Automarke==* range=0,3 db=neu_kat>
         <TABLE WIDTH="400" CELLPADDING="2" CELLSPACING="2" ALIGN="CENTER"
   BORDER="0"> 
  <TR> 
    <TD WIDTH="400" COLSPAN="4"><IMG SRC="files/balken_760_001.gif"
    WIDTH="400" HEIGHT="1" BORDER="0" VSPACE="2"></TD> 
  </TR> 
  <TR> 
    <TD WIDTH="125"><FONT FACE="Arial" SIZE="2"
    COLOR="#808080"><STRONG><B>AUTOMARKE:</B></STRONG></FONT></TD> 
    <TD WIDTH="50"><IMG SRC="files/blind_001.gif" WIDTH="5" HEIGHT="30"
    BORDER="0"></TD> 
    <TD WIDTH="225" COLSPAN="2"><FONT FACE="Arial" SIZE="2"
    COLOR="#000000"><STRONG><B>$Automarke &nbsp;</B></STRONG></FONT></TD> 
  </TR> 
  <TR> 
    <TD WIDTH="125"><FONT FACE="Arial" SIZE="2"
    COLOR="#808080"><STRONG><B>AUTOTYP:</B></STRONG></FONT></TD> 
    <TD WIDTH="50"><IMG SRC="files/blind_001.gif" WIDTH="5" HEIGHT="30"
    BORDER="0"></TD> 
    <TD WIDTH="225" COLSPAN="2"><FONT FACE="Arial" SIZE="2"
    COLOR="#000000"><STRONG><B>$Autotyp</B></STRONG></FONT></TD> 
  </TR> 
  <TR> 
    <TD WIDTH="125" BGCOLOR="#FFFFCC"><FONT FACE="Arial" SIZE="2"
    COLOR="#808080"><STRONG><B>UNIVERSAL-KAT:</B></STRONG></FONT></TD> 
    <TD WIDTH="50" BGCOLOR="#FFFFCC"><A
    HREF="http://www.uni-fit.de/2003/dok/produkt_un_331.html" TARGET="_blank"><IMG
    SRC="files/abbildung_50_30.gif" ALT="ABBILDUNG" WIDTH="50" HEIGHT="30"
    BORDER="0"></A></TD> 
    <TD WIDTH="225" BGCOLOR="#FFFFCC" COLSPAN="2"><FONT FACE="Arial"
    SIZE="2" COLOR="#000000"><STRONG><B>$Universalkat</B></STRONG></FONT>
    &nbsp;</TD> 
  </TR> 
  <TR> 
    <TD WIDTH="125" BGCOLOR="#FFFFCC"><FONT FACE="Arial" SIZE="2"
    COLOR="#808080"><STRONG><B>NEU-KAT:</B></STRONG></FONT></TD> 
    <TD WIDTH="50" BGCOLOR="#FFFFCC"><IMG SRC="files/blind_001.gif"
    WIDTH="5" HEIGHT="30" BORDER="0"></TD> 
    <TD WIDTH="225" BGCOLOR="#FFFFCC" COLSPAN="2"><FONT FACE="Arial"
    SIZE="2" COLOR="#000000"><STRONG><B>$Neukat</B></STRONG></FONT> &nbsp;</TD> 
  </TR> 
  <TR> 
    <TD WIDTH="125" BGCOLOR="#FFFFCC"><FONT FACE="Arial" SIZE="2"
    COLOR="#808080"><STRONG><B>RECYCLING-KAT:</B></STRONG></FONT></TD> 
    <TD WIDTH="50" BGCOLOR="#FFFFCC"><IMG SRC="files/blind_001.gif"
    WIDTH="5" HEIGHT="30" BORDER="0"></TD> 
    <TD WIDTH="225" BGCOLOR="#FFFFCC" COLSPAN="2"><FONT FACE="Arial"
    SIZE="2" COLOR="#000000"><STRONG><B>$Recyclingkat</B></STRONG></FONT>
    &nbsp;</TD> 
  </TR> 
  <TR> 
    <TD WIDTH="400" COLSPAN="4"><IMG SRC="files/balken_760_001.gif"
    WIDTH="400" HEIGHT="1" BORDER="0" VSPACE="2"> </TD> 
  </TR> 
  </TABLE></loop><br><br>
<perl>
$v=$v||0;
get "Id==* sort=Id range=$v,3", "/unifit-daten.de/2003/katalysatoren/neu_kat";

      my $range=$_range_length;
      my $blaettern=$_range_length;
my $blaetter_lang=$range*10;
my $newrange=$_range+$_range_length;
my $oldrange=$_range-$_range_length;
my $color='#CCCCCC';
my $color_vonbis='#FFFFFF';
my $color_zahl='#CCCCCC';
my $color_vorzu='#CCCCCC';
my $color_balken='#CCCCCC';
my $font='Arial';
my $size='1';
my $table='400'; #kann auch %-Angabe gesetzt werden
my $table_align='center';

      out "<div align=$table_align>";
      out "<table width=$table cellpadding=2 height=15 cellspacing=2><tr align=left>
<td bgcolor=$color align='center'><font face=$font font size=$size>";
 
$oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;

      out $oldrange>=0?"<a href=\"$_link&v=0\">|<</a>":"|<";
      out "</font></td><td bgcolor=$color align='center'><font face=$font font size=$size>";
out $oldrange>=0?"<a href=\"$_link&v=$oldrange\"><</a>":"<<";
out "</font></td><td bgcolor=$color align='center'><font face=$font font size=$size>";

      $ende=substr($_amount_query,0,length($_amount_query)-1);
      out $newrange<$_amount_query?"<a href=\"$_link&v=$newrange\">></a>":">>";
out "</td><td font face=$font font size=$size bgcolor=$color align='center'><font face=$font font size=1>";
out $newrange<$_amount_query?"<a href=\"$_link&v=".($ende."0")."\">>|
</a>":">|";
out "</font></td><td bgcolor=$color_vonbis width='185' align='center'><font face=$font font size=$size>Einträge ".($v+1)." bis
".(($v+$blaettern)>$_amount_query?"$_amount_query":($v+$blaettern))." von
$_amount_query</td>";
 
if ($_amount)
{

      $vr=int($v/$blaetter_lang) unless $_range==0;
      $vr=$vr*$blaetter_lang;
out "<td bgcolor=$color_vorzu align='center'><font face=$font font size=$size><a href=$_link&v=".($vr-$blaetter_lang)."><<</a></td>" if
 
($vr-$blaetter_lang)>=0;
for ($i=$vr;$i<($vr+$blaetter_lang<=$_amount_query?($vr+$blaetter_lang):$_amount_query); $i+=$blaettern)

      {
      out "<td bgcolor=$color_zahl align='center'><font face=$font font size=$size>".($v==$i?"<b>".($i+1)."</b>":"<a
href=$_link&v=$i>".($i+1)."</a>")."</td>";
}
out "<td bgcolor=$color_vorzu align='center'><font face=$font font size=$size><a href=$_link&v=$i>>></a></td>" if $i<$_amount_query;
}
out "</font></tr></table></div>"; 
 
</perl>

      <br><br><A HREF="http://www.uni-fit.de/2003/dok/auswahl_kat.html" TARGET="_self"><IMG SRC="files/auswahl_100.gif" ALT="ZUR AUSWAHL" WIDTH="100" HEIGHT="30" BORDER="0"></A>

      <br><br><FONT FACE="Arial"
    SIZE="1">UNI-FIT &reg; SOLUTIONS - GRENZWEG 9 - 75331 ENGELSBRAND -
    GERMANY<BR>Tel. +49(0)7235.980585 - Fax +49(0)7235.980686 - Mail:
    info@uni-fit.de</FONT><br><br>

       <SCRIPT LANGUAGE="Javascript">
      function printit(){ 

      if (NS) {

          window.print() ; 

      } else {

          var WebBrowser = '<OBJECT ID="WebBrowser1" WIDTH=0 HEIGHT=0 CLASSID="CLSID:8856F961-340A-11D0-A96B-00C04FD705A2"></OBJECT>';

      document.body.insertAdjacentHTML('beforeEnd', WebBrowser);

          WebBrowser1.ExecWB(6, 2);//Use a 1 vs. a 2 for a prompting dialog box    WebBrowser1.outerHTML = "";

      }

      }

      </SCRIPT> <SCRIPT LANGUAGE="Javascript">

      var NS = (navigator.appName == "Netscape");

      var VERSION = parseInt(navigator.appVersion);

      if (VERSION > 3) {

          document.write('<form><input type=button value="DRUCKEN" name="Print" onClick="printit()"></form>'); 

      }

      </SCRIPT></H5>
      <p><font face="arial,helvetica" size=1><b></BR>Alle Preise in EURO, inkl. gesetzl. MwSt. Preisänderungen vorbehalten ! &copy; uni-fit.de & agentur-xy.de / 2003</b>
<p></font>

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

     Antworten

    Beitrag von till (1103 Beiträge) am Donnerstag, 10.Juli.2003, 11:01.
    Re: DRINGEND HILFE ERBETEN

      hallo sebastian,
      ich denke da fehlt nur ein ^ zeichen !
      probiere mal

      ...
      <loop Automarke==* range^=0,3 db=neu_kat>
      ...

      dann müsste es gehen.

      till

     Antworten

    Beitrag von Sebastian (0 Beiträge) am Donnerstag, 10.Juli.2003, 11:11. WWW: uni-fit.de
    Re: DRINGEND HILFE ERBETEN

      hallo till,

      erstmals vielen dank für deine prompte antwort. aber leider war das nicht der fehler. das komische ist, dass in der url unten links im browser richtig angezeigt wird nur scheint die datenbank nicht dem wechsel zu folgen. habe auch schon andere perl-scripts versucht, von der ganz einfachen blätter funktion bis zur komfortablen.

      sebastian

     Antworten

    Beitrag von till (1103 Beiträge) am Donnerstag, 10.Juli.2003, 11:22.
    sh.t ... bei meinem blätterproblem hat das geholfen

      sorry für den falschen rat.

      till

     Antworten

    Beitrag von till (1103 Beiträge) am Donnerstag, 10.Juli.2003, 11:07.
    erklärung aus der doku

      hallo nochmals,
      ich denke des rätselös lösung ist in der doku (wenn auch etwas versteckt) zu finden:

      "URL-Parametern Vorrang geben
      Ein im Template gesetzter Parameter überschreibt normalerweise einen gleichnamigen Parameter in der URL. Wenn Sie dies nicht wollen, müssen Sie ein "^" vor das Istgleich-Zeichen "=" setzen. Dies funktioniert mit allen Parametern. "

      sei so nett und poste hier falls ich recht hatte.

      till

     Antworten

    Beitrag von Sebastian (0 Beiträge) am Donnerstag, 10.Juli.2003, 11:22. WWW: uni-fit.de
    Re: erklärung aus der doku

      ebenfalls nochmals hallo,
      komme gerade ins "schwimmen". wo muss ich das "^" überall hinsetzten. beim range im loop ? beim range im perl ? oder später wenn ich die datenbank per url aufrufe in die url ? nochmals vielen dank im voraus
      sebastian

     Antworten

    Beitrag von till (1103 Beiträge) am Donnerstag, 10.Juli.2003, 11:28.
    ein beispiel

      hi sebastian,

      bei mir läuft dieses template sehr gut, mit einwandfreier blätterfunktion. so wie ich das sehe reicht das ^zeichen beim range

      till

      hier mein beispiel:

      <perl>
init "erfassung";
sub format_currency {
   my ($val, $currency, $amount) = @_;
 $val =~ tr/\./\,/;                        # Dezimalkomma
 1 while $val =~ s/^(-?\d+)(\d{3})/$1.$2/; # Punkte in 3er Schritten
return "$val $currency";
return "$val";
}
</perl>
<html><head>
<title>XXXXXXXXXXXXX</title>
</head>
<font face=arial size=3><b>
<table width="800" boder="0">
<tr><td width="600">
<b>Gebrauchtwagen XXXXXXXXXXXX</p></font>
<font size=2 font color =#FF0000>Bei uns können Sie jeden Gebrauchten auch Leasen !<br>
Kontakt XXXXX <a href=mailto:XXXX</a><br>
</font><br>
<font face=arial size=-1>
<a href="http://XXXX">gezielte Suche im Gesamtangebot</a><br>
<font size=2>
<br>Stand:
<perl>
out datum("jetzt", "Wochentag, Tag.Monatname.Jahr");
</perl>
<p>
<loop db=erfassung sort=marke,modell code=perl range^=0,10 gruppe==gw>
out "<table border=0>";
out "<tr><td width=\"300\" bgcolor=\"#FFFFCC\">";
out "<font face=arial size=2><b>$marke $modell <br>$ez</b><br>";
out "<font face=arial font size=+1>";
if ($mwst == 0)
{
$outpreis = $preis * 1.16;
}
else
{
$outpreis = $preis;
}
out format_currency(int($outpreis));
out ",-- Euro</b>";
if ($mwst == 0) 
{
out " <br>MwSt ausweisbar";
}
out "<p><font face=arial size=1><a href=http://XXXXXX?htx=/XXXXX$_id target=\"Haupttext\"> Details zu diesem Angebot</a></td>";
out "<td width=\"500\"><img src=\"http://XXXXX/bilder/$_id.jpg \"width=\"160\" height=\"120\">"; 
out "</td></tr></table>";
</loop>
<perl>
my $range=$_range_length;
my $blaettern=$_range_length;
my $blaetter_lang=$range*10;
my $newrange=$_range+$_range_length;
my $oldrange=$_range-$_range_length;
my $color='#CCCCCC';
my $color_vonbis='#FFFFFF';
my $color_zahl='#CCCCCC';
my $color_vorzu='#CCCCCC';
my $color_balken='#CCCCCC';
my $table='450';
my $table_align='left';
out "<div align=$table_align>";
out "<table width=$table cellpadding=2 cellspacing=2><tr align=left><td bgcolor=$color align='center'>";
$oldrange=0 if $oldrange<0 && $oldrange>-$_range_length;
out $oldrange>=0?"<a href=\"$_link&range=0,$_range_length\">|&lt;</a>":"|<";
out "</td><td bgcolor=$color align='center'>";
out $oldrange>=0?"<a href=\"$_link&range=$oldrange,$_range_length\">&lt;</a>":"<<";
out "</td><td bgcolor=$color align='center'>";
$ende=substr($_amount_query,0,length($_amount_query)-1);
out $newrange<$_amount_query?"<a href=\"$_link&range=$newrange,$_range_length\">&gt;</a>":">>";
out "</td><td bgcolor=$color align='center'>";
out $newrange<$_amount_query?"<a href=\"$_link&range=".($ende."0").",$_range_length\">&gt;| </a>":">|";
out "</td><td bgcolor=$color_vonbis width='200' align='center'><font size=-3>Einträge ".($_range+1)." bis ".(($_range+$blaettern)>$_amount_query?"$_amount_query":($_range+$blaettern))." von $_amount_query</td>";
if ($_amount)
{
         $vr=int($_range/$blaetter_lang) unless $_range==0;
         $vr=$vr*$blaetter_lang;
         out "<td bgcolor=$color_vorzu align='center'><a href=$_link&range=".($vr-$blaetter_lang).",$_range_length\><<</a></td>" if ($vr-$blaetter_lang)>=0;
         for ($i=$vr;$i<($vr+$blaetter_lang<=$_amount_query?($vr+$blaetter_lang):$_amount_query); $i+=$blaettern)
         {
             out "<td bgcolor=$color_zahl align='center'>".($_range==$i?"<b>".($i+1)."</b>":"<a href=$_link&range=$i,$_range_length>".($i+1)."</a>")."</td>";
         }
         out "<td bgcolor=$color_vorzu align='center'><a href=$_link&range=$i,$_range_length>>></a></td>" if $i<$_amount_query;
     }
      out "</tr></table></div>";
out <<EOF;

      <div align=$table_align>
        <table border="0" cellpadding="0" cellspacing="0" width=$table>
    <tr>
      <td width="0"><img border='0' src='http://www.URL.de/images/blind.gif' width='2' height='2'></td>
      <td bgcolor="#C0C0C0" width="100%"><img border='0' src='http://www.URL.de/images/blind.gif' width='2' height='2'></td>
       <td width="0"><img border='0' src='http://www.URL.de/images/blind.gif' width='2' height='2'></td>
    </tr>
  </table>
</div>

      EOF
         
      </perl>
</tr></td></table>

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

     Antworten

    Beitrag von sebastian (533 Beiträge) am Donnerstag, 10.Juli.2003, 11:39. WWW: uni-fit.de
    Re: ein beispiel

      hallo till, wenn ich dein perl kopiere und bei mir einfüge, die ausgabeseite weglasse, FUNKTIONIERT ES. DANKE. Warum das andere nicht geht, bleibt wahrscheinlich eine der ungelösten fragen dieser erde. vielen dank für deine hilfe.

      sebastian

     Antworten

    Beitrag von Sebastian (0 Beiträge) am Donnerstag, 10.Juli.2003, 11:47. WWW: uni-fit.de
    Re: ein beispiel

      so das blättern haben wir jetzt. jetzt habe ich noch folgendes, wenn ich mir daten aus der mitte der datenbank anzeigen lasse und dann die blätter-funktion nütze beginnt er am anfang und nicht dort wo ich ausgewählt habe. kann ich das mit dem script "merken" anstellen.

      sebastian

     Antworten

    Beitrag von till (1103 Beiträge) am Donnerstag, 10.Juli.2003, 14:29.
    nicht kapiert

     Antworten

    Beitrag von Sebastian (0 Beiträge) am Freitag, 11.Juli.2003, 09:03. WWW: unifit.de
    Re: nicht kapiert

      guten morgen till, ich meinte damit, wenn ich jetzt z.b. autos der marke citreon aufrufe, dann die blätter-funktion verwende ist er immer an den anfang gesprungen zu audi. habe jetzt aber ein script eingefügt ($merken) habe das in dem blättern-script eingefügt. und nun macht er an der stelle weiter, die aufgerufen wurde und geht nicht zum anfang. wenn du mal schauen willst, http://www.unifit.de/2003/dok/auswahl_kat.html. und nochmals vielen dank für deine hilfe. solltest du mal einen katalysator oder so etwas benötigen, lasse es mich wissen. du hast noch etwas gut. gruss sebastian

     Antworten


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