Bonjour,

j'ai des améliorations à apporter à une page web existante mais comme je n'y connais pas grand chose, j'aurai besoin que vous m'aidiez à savoir si ce que je fais est correct. (Je ne peux pas tester mon code avant une semaine).

Il faut que je puisse ajouter une combo box à une page web existante.
Pour cela, dans le fichier (à modifier) qui contient le code html, je compte écrire :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
print<<EOFPart1
<FORM Name="canal">
	<SELECT NAME="Liste" onChange="Recup()">
		<OPTION VALUE="">Choisir un canal
EOPart1
	my @tab = ("Mail","Lettre","Colis");
 
	foreach my $val (@tab)
	{
		print(<OPTION VALUE=$val>$val);
	}
print<<EOPart2
	</SELECT>
</FORM>
EOPart2
 
 
<SCRIPT language="Javascript">
function Recup() {
	val = document.forms['Choix'].element['Liste'].selectedIndex;
	if (val == 0) return;
	choice = document.forms['Choix'].element['Liste'].options[val].value;
}
 
</SCRIPT>
L'écriture de l'affichage de la combo box est-elle correcte ?

Ensuite, comment est-ce qu'il faut que je fasse pour que le choix qui aura été fait soit stocké dans une variable perl ?

Merci