Schrift
Wiki:Tipp zum Debugging: use Data::Dumper; local $Data::Dumper::Useqq = 1; print Dumper \@var;
Start · Board · Webprogrammierung mit Perl · Perl/CGI
[thread]503[/thread]

HTML::TEMPLATE



<< >> 2 Einträge, 1 Seite
Gast Gast
 2005-06-04 19:50
#5035 #5035
Hallo zusammen,

kann mir jemand dabei helfen:

datensätze auslesen soweit ok > wenn bestimmte datensätze z.B immer TERMIN beinhalten, vergleichen mit "eq" und z.B im HTML Template mit einer °bestimmten Farbe zuweisen°.

Vom prinzip if() in diesem falle wüsste ich wirklich nicht wie ich das Anstellen soll.

Vielleicht kann mir ja hier jemand helfen



Code: (dl )
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
# db-mysql
 
  my $template = HTML::Template->new(filename => 'test.html');

  
  my $data = $sth->fetchall_arrayref({
     id        => 1,
     art    => 1,  
     ort    => 1
         }
  );

  $template->param( ABFRAGE => $data );
  print $template->output();

# also wenn im column art "TERMIN" dann


ich hoffe es ist soweit verständlich

ich habe es mit einer while schleife probiert gehabt funktioniert nicht

Code: (dl )
1
2
3
4
5
#snippet

while (my @result = $sth->fetchrow_array) {
if ($result[1] eq "TERMIN") { print qq{ etc..}
}
Tom
 2005-06-04 21:01
#5036 #5036
User since
2003-09-20
470 Artikel
BenutzerIn
[Homepage] [default_avatar]
Ich habe das so gemacht dass wenn der Begriff vorkommt ich einfach die Formatierung "class" ändere, z.B. so:

Code: (dl )
1
2
3
4
5
6
7
8
if ($checkmail eq 1)
{
    $template->param(CLASS => "inputcolor");
}
else
{
    $template->param(CLASS => "");
}


Die CSS-Definition sieht so aus:

Code: (dl )
1
2
3
4
5
<style type="text/css">
  .inputcolor{
    background: #FFFFCC;
  }
</style>


Tom\n\n

<!--EDIT|Tom|1117904589-->
Computerprobleme??? -> http://www.weber-computerhilfe.de

Fordere keine Anerkennung!
Zeige was und man wird Dich kennen
<< >> 2 Einträge, 1 Seite



View all threads created 2005-06-04 19:50.