loading a pulldown list from a database
loading a pulldown list from a database
(OP)
I have created a form using Perl/CGI_pm and would like
to load several pulldown list from tables in my MYSQL DB.
Does anyone know a snipit of code that can do this.
Thank you very much
eric
to load several pulldown list from tables in my MYSQL DB.
Does anyone know a snipit of code that can do this.
Thank you very much
eric
RE: loading a pulldown list from a database
i guess you want something like -
use DBI;
my ($database, $host, $user, $password) =
( "db_name", "localhost", "user_name", "password" );
# connect to database
my $dbh = DBI->connect("DBI:mysql:$database:$host",$user,$password) || die "Unable to connect to database.";
my $statement = "select field from table;";
# prepare statement
my $sth = $dbh->prepare($statement) || die "Can't prepare $statement";
# execute statement
my $rv = $sth->execute || die "can't execute the query";
print "Content-type: text/html\n\n";
print "<html><head></head><body>\n";
print "<form>\n";
print "<select>\n";
while(my @result = $sth->fetchrow_array) {
print "<option>@result[0]\n";
}
my $rc = $sth->finish;
$dbh->disconnect;
print "</select>\n";
print "</form>\n";
print "</body></html>\n";
RE: loading a pulldown list from a database
It was the "While loop" that
stumped me...
Thanks
Eric