hi, wie ich sehe nimmst du auch den shop aus der bib von cb. habe das hier eingebaut was du willst.
habe auch lang rumprobiert und dann hat es funktioniert. . .
<!-- ab hier datenbankausgabe -->
<perl>$ic=0;</perl>
<perl>$range1||=0;$range2=12;</perl>
<loop Rubrik==$Rubrik code=perl Name==* sort=Preis range=$range1,$range2>
############### BEREINIGUNG NACH WARENGRUPPE
if ($Rubrik eq "Hosenrohre")
{
$name_2=~s/,/,<br>/g; # nach Leerzeichen im Namen suchen und wandeln in +
}
########################################################################################
out "<tr valign=top align=middle>" unless $ic%4;
out '<td><a href="'.$link.'&htx=/'.$user.'/detail&Rubrik=='.convert_html($Rubrik).'&Id=='.$_id.'">';
########################################
######### BILD PRÜFUNG auf server/uni-fit.de
$x=get "http://www.lambdasondenshop.de/baseportal/shop/$Bild.gif";
if($x eq "") {
out "Keine Abbildung<br>vorhanden.<br><br>";
}
else {
out '<img src="'."$images/$Bild".'.gif" style="border:solid 1px #808080" width=96 height=72>' if $Bild ne '';
}
#########################################
out '<br><font size=2><b><str>'.$Name.'</font></b></str><br><font size=1>'.$name_2.'</font><br><b><str>'.$Preis.'</b></str> Euro</a></td>';
out "</tr>" unless ++$ic%4;
</loop>
<perl>out "</tr>" if $ic%4;</perl>
<!-- datenbankausgabe ende -->
</table>
</td></tr></table>
</center>
<BR>
<P ALIGN="CENTER"><B><ST><FONT FACE="Verdana" SIZE="1"
COLOR="#808080"><STRONG>ES WERDEN IMMER MAX. 12 PRODUKTE ANGEZEIGT.<BR><BR> BITTE
BLÄTTERN SIE MIT "WEITER / ZURÜCK" ODER MIT "ANFANG" ZUR ERSTEN ÜBERSICHT.</STRONG></FONT><BR><BR><BR> <FONT FACE="Verdana" SIZE="1">
<A HREF="$link&htx=$htx&Rubrik==$Rubrik&range2=<perl>out $range1+$range2</perl>">A N F A N G
</A> | |
<A HREF="$link&htx=$htx&Rubrik==$Rubrik&range1=<perl>out $range1+$range2</perl>">W E I T E R</A> | |
<A HREF="$link&htx=$htx&Rubrik==$Rubrik&range1=<perl>out $range1-$range2</perl>">Z U R Ü C K </A>
<BR><BR></FONT>
</td>
<include src=warenkorb>
