J'essaie de constituer un schéma de formulaire avec au maximum une vingtaine de réponses, l'utilisateur devant répondre à toutes les questions.
- à chaque click sur une case à cocher de réponse, la fonction Valider_une_reponse(numéro,note) enregistre que la réponse à une question existe rempli(numero) et la note correspondant à la réponse notes(numéro).
- lorsque l'utilisateur click sur terminé, la fonction Validation_totale(nbq) vérifie chacune des nbq questions a recu une réponse et donne la note totale obtenue.

A l'usage, chacune des opérations indique "impossible d'affecter à un résultat de fonction" sur un webBrowser de Delphi 6, ou "erreur sur la page" en visionnant sur firefox.

Merci pour vos observations!

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
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
EN HEAD =======================================
<!--
var rempli = [false, false,false,false,false,false, false,false,false,false,false, false,false,false,false,false, false,false,false,false];
var notes =[0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0,0];
function Valider_une_reponse(numero,note)
{
rempli(numero) = true;
notes(numero) = note;
}
function Validation_totale(nbq)
{
var MissingAnswers = "";
var Counter = 0;
var i = 0;
var test_rep = true;
while (i < nbq)
{
test_rep = test_rep && rempli(i);
if  (rempli(i) = false) {MissingAnswers = MissingAnswers  +string(i+1)  +", " ; }
Counter = Counter + notes(i);
i = i +1;
}
if (test_rep = false)
{		window.alert("Il manque la/les réponse(s) suivante(s) : " + MissingAnswers);			}
else
{                     window.alert("Votre note est de " +string(Counter));			}
 
}
//-->
</SCRIPT>
====================================================
FORMULAIRE DANS BODY
<FORM method = post name = "quest">
<TABLE border=1>
<TR>
<TD width = 30>N° :</TD>
<TD width = 400>L'affirmation</TD>
<TD width = 60 align = center>Tout à fait<br> d'accord</TD>
<TD width = 60 align = center>Plutôt <br>d'accord</TD>
<TD width = 60 align = center>Plutôt en<br>désaccord</TD>
<TD width = 60 align = center>Pas du tout<br>d'accord</TD>
</TR><TR>
<TD width = 30>1 :</TD>
<TD width = 400>Question deux </TD>
<TD width = 60 align = center><input  type = "radio" name = "R1" , onclick = "Valider_une_reponse(0,0);"></TD>
<TD width = 60 align = center><input type = "radio" name = "R1" , onclick = "Valider_une_reponse(0,1);"></TD></p>
<TD width = 60 align = center><input type = "radio" name = "R1" , onclick = "Valider_une_reponse(0,2);"></TD></p>
<TD width = 60 align = center><input type = "radio" name = "R1" , onclick = "Valider_une_reponse(0,3);"></TD></p>
</TR><TR>
<TD width = 30>2 :</TD>
<TD width = 400>Question deux</TD>
<TD width = 60 align = center><input  type = "radio" name = "R2" value = 1, onclick = "Valider_une_reponse(1,0);"></TD>
<TD width = 60 align = center><input type = "radio" name = "R2" value = 2 ID="Radio1", onclick = "Valider_une_reponse(1,1);"></TD>
<TD width = 60 align = center><input type = "radio" name = "R2" value = 3 ID="Radio2", onclick = "Valider_une_reponse(1,2);"></TD>
<TD width = 60 align = center><input type = "radio" name = "R2"  value = 4 ID="Radio3", onclick = "Valider_une_reponse(1,3);"></TD>
</TR><TR>
....... autres questions
</TABLE>
<p><A href = "javascript:Validation_totale(5);">TERMINE</A></p>
</FORM>