Hallo,
hab folgendes Problem habe eine bestehende Datenbank und möchte diese per Perl auf den Bildschirm ausgeben. Die Ausgabe soll aber nicht über den ganzen Bildschirm laufen sondern nur ein 10zeiliges Menü am Bildschirm sein, dass ich mit einem Scroll down balken durchscrollen kannhier noch ein Codefragment
$dbh = DBI->connect("DBI:mysql:$datenbank:$datenbankhost","$datenbankuser","$Datenbankpasswort") or print ("<tr><td><b><h2>Fehler bei der Datenbankverbindung aufgetreten.</h2></b></td></tr>");
Was macht eigentlich folgender Absatz?
den hab ich nur kopiert
my $sth = $dbh->prepare( "show columns from mitglieder");
$sth->execute();print "<tr>";
while(@ergebnis=$sth->fetchrow_array)
{
print "<td>\n<b>";
print $ergebnis[0];
print "</b><br>\n</td>";
}
print "</tr>\n";
ab hier versteh ichswieder, weil ichs selber programmiert hab
$sql = qq{select * from mitglieder};
$sth = $dbh->prepare( $sql );
$sth->execute();
while(@ergebnis=$sth->fetchrow_array)
{
print "\t<tr>\n";
foreach (@ergebnis)
{
print "\t\t<td>";
print;
print "<br></td>\n";
}
print "\t</tr>\n";
}
print"</tbody></table><br></body></html>";$sth->finish();
$dbh->disconnect();
vielen Dank
Christian
Datum: 08.03.2006-08:43
Datenbank in Textfeld schreiben
