Hawkes, Mick I <mailto:[EMAIL PROTECTED]> wrote:
: All i want is a pull down select to work. I can get it to display
: passed data but I just can't get it to return the selection. here is
: a code snippit (its inside a table) .
:
: <td><select name ="TMPL_VAR NAME="html_status">">
: <option value = "<TMPL_VAR NAME="html_status">" selected> <tmpl_var
: name="HTML_Status"> <option value="Open"> >Open
: <option value="Pending">Pending
: <option value="Closed">Closed </select></td>
: </tr>
:
: so why doesn't it work?
What leads you to believe it doesn't work? Can we see a non-working
example which includes code?
Doesn't work because there is nothing returned to the code.
This is the only relevant piece of the HTML code, if I was to include
it all would only confuse the issue. Other text fields are used and returned
without problem.
The code is very simple :
sub insertproject
{
my $self = shift; # get the passed parameters.
my $q = $self->query(); # get acopy of the CGI object.
my $dbh = $self->param('mydbh'); # get the database handle.
## Construct the SQL Statement
# Get the values from the form.
# my $HTML_OCLRef = $q->param("HTML_OCLRef");
# my $HTML_ProjectID = $q->param("HTML_ProjectID");
my $HTML_RespOfficer=$q->param("HTML_RespOfficer")||undef;
my $HTML_ProjectName=$q->param("html_projectname")||undef;
my $HTML_DateListed=$q->param("HTML_DateListed")||undef;
my $HTML_ProjectDescription=$q->param("HTML_ProjectDescription")||undef;
my $HTML_Priority=$q->param("HTML_Priority")||undef;
my $HTML_Status=$q->param("HTML_Status");
#my $HTML_Status="Open";
my $HTML_AreaMgr=$q->param("HTML_AreaMgr")||undef;
my $HTML_Technology=$q->param("HTML_Technology")||undef;
my $HTML_Area=$q->param("HTML_Area")||undef;
my $HTML_FaultSource=$q->param("HTML_FaultSource")||undef;
my $HTML_FaultSourceContact=$q->param("HTML_FaultSourceContact")||undef;
my $HTML_DateCompleted=$q->param("HTML_DateCompleted")||undef;
# Setup and Query the database and find the max value of
# 'OCLRef' and store in $MaxOCLRef.
my $sqlstr = "SELECT Max(OCLRef) As MaxOCLRef FROM tblProjects;";
my $sth = $ dbh->prepare($sqlstr);
$sth->execute();
my @MaxOCLRef = $sth->fetchrow_array; #should return a table with one value.
........more code.......
As I said above all the other parameters are returned, this one , which
is the only pulldown select I use, doesn't
Ibased on your comment, can I assume that the syntex of the HTML code
correct ?]
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
