Avatar billede perh Juniormester
08. december 2002 - 15:53 Der er 4 kommentarer og
1 løsning

udskrive elementer fra multiple choice dropdown.

Hvordan kan jeg få udskrevet alle valgene i en multiple dropdown box?

<select size="10" name="Til_Sprog"  multiple>

Jeg har et formbehandlingsscript, der sender formulardata med email:

use CGI qw(:standard);
my $GET = new CGI;
my @VAL = $GET->param;

foreach(@VAL){
    $FORM{$_} = $GET->param($_);
}

$Firma = $GET->param('Firma');
osv...

.......


my $message = qq~
        formdata:       
            $Navn
            $Adresse
            $By


...

print MAIL "$message\n\

....
Avatar billede perh Juniormester
08. december 2002 - 17:57 #1
Jeg kan således udskrive alle enkelte formulardata, men multiple dropdown boksen sender vel en array, så hvordan får jeg elementerne ud af den?
Avatar billede thomasledet Nybegynder
08. december 2002 - 20:10 #2
fra perldoc CGI:

<snip>
      FETCHING THE VALUE OR VALUES OF A SINGLE NAMED PARAMETER:

          @values = $query->param('foo');

                    -or-

          $value = $query->param('foo');

      Pass the param() method a single argument to fetch the value of the named parameter. If the parameter is multivalued (e.g. from multiple selections in a scrolling
      list), you can ask to receive an array.  Otherwise the method will return a single value.

      If a value is not given in the query string, as in the queries "name1=&name2=" or "name1&name2", it will be returned as an empty string.  This feature is new in
      2.63.
</snip>
Avatar billede perh Juniormester
08. december 2002 - 23:06 #3
OK
- Jeg er som du kan se ikke særlig god til PERL - men prøver at lære noget.

> If the parameter is multivalued (e.g. from multiple selections in a scrolling
      list), you can ask to receive an array.
vil det sige at jeg skal skrive
@Firma = $GET->param('Firma');

og derefter
my $message = qq~
        formdata:
for each value in @Firma print $Firma     
            $Navn
            $Adresse
            $By


...
Avatar billede perh Juniormester
08. december 2002 - 23:56 #4
OK, så forstår jeg det:
foreach $Spr(@Firma){$T_Spr .= qq| $Spr |;};

Send lige et svar, så du kan få dine point
Avatar billede thomasledet Nybegynder
09. december 2002 - 20:23 #5
det er et svar... :)
Avatar billede Ny bruger Nybegynder

Din løsning...

Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.

Loading billede Opret Preview
Kategori
Kurser inden for grundlæggende programmering

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester