<% &gen_widgets('htmledit_html',120,$SE{layoutwidth} - 230 - 55,40,'headline','Headline'); %>
<% &gen_widgets('htmledit_html',121,$SE{layoutwidth} - 230 - 55,80,'headtext','Einleitung'); %>
<% &gen_widgets('htmledit_html',122,$SE{layoutwidth} - 230 - 55,260,'text','Fließtext'); %>
<% &gen_widgets('filebank_html',4,230,'Bild #1'); %>

<% my $output; for ( $i = 1; $i < 11; $i++ ) { $i1 = $i*10+1; $i2 = $i*10+2; $i3 = $i*10+3; $i4 = $i*10+4; $i5 = $i*10+5; $i6 = $i*10+6; $i7 = $i*10+7; $x1 = $i*3 + 130 + 1; $x2 = $i*3 + 130 + 2; $x3 = $i*3 + 130 + 3; my $linkIntern; my @typ_list = ( "aktiv_harmonisch.gif", "entspannung_pur.gif", "fit_und_frei.gif", "heilkraefte.gif", "hin_und_weg.gif", "kneipp_cuisine.gif", "lebensqualitaet.gif", "neues_entdecken.gif", "prickelnde_vielfalt.gif", "vertraeumt_anregend.gif", "wellness.gif", "wie_neu_geboren.gif", "wohlbefinden.gif", "zeichen_der_zeit.gif", "zeitlos_modern.gif" ); my $slogan; foreach my $typ (@typ_list) { %selected = ("$value[$i2]" => "selected"); $slogan .= qq(); } # Im Zuge des Relaunchs kein Zugriff mehr auf Redsys erlauben. # # # foreach my $menu ( @{$SE{redsys}} ) { # my @seite = split /\t/, $menu; # my $chk = "$seite[0]" eq $value[$i6] ? "SELECTED" : ""; # $linkIntern .= qq(\n); # } %feld7 = ("$value[$i7]" => "selected"); $bild = &gen_widgets('filebank_html',$i1,230,'Bild #'.$i); $xbild1 = &gen_widgets('filebank_html',$x1,133,'Bild'); $xbild2 = &gen_widgets('filebank_html',$x2,133,'Bild'); $xbild3 = &gen_widgets('filebank_html',$x3,133,'Bild'); # $output .= qq(); $einleitung = &gen_widgets('htmledit_html',$i3,360,100,'text','Überschrift #'.$i); $fliesstext = &gen_widgets('htmledit_html',$i4,360,100,'text','Text #'.$i); $linkExtern = &gen_widgets('htmledit_html',$i5,360,20,'text','EXTERNER Link #'.$i); $linkIntern = &gen_widgets('htmledit_html',$i6,360,60,'text','INTERNER Link (Pfad hinter www.bad-woerishofen.de/) #'.$i); $output .= qq( ); } $output; %>
$bild $xbild1 $xbild2 $xbild3 Hintergrundfarbe #$i


$einleitung
$fliesstext

$linkExtern

$linkIntern