Discussion :

[isa21493]

bonjour à tous,

voilà j'ai des checkbox dans bcp de formulaires et je voudrais que dans mon dernier formulaire je puisse récupérer les cases cochées de tous les autres formulaires.

voici mon code qui ne marche pas:

dans chaque formulaire je récupère les cases cochées du formulaire précédent et je mets les valeurs dans des sessions pour pouvoir les récupérer à la fin.

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
<%
for i = 1 to Request.Form("choix").Count 
	session("res & i")= Request.Form("choix")(i)
next
%>

et voici mon code dans le dernier formulaire:

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
<%
for i=1 to 30
	R(i)  = session("res & i")
	Response.Write(R(i))
next
%>

Le problème c que déjà je ne sais pas combien je vais avoir de cases cochées donc mon for ne va pas. (30)
et ensuite le résultat de mon code donne la dernière case cochées x 30.
Il me répète 30 fois la dernière et ne m'affiche pas les autres.

QQun peut il m'aider SVP???

Merci

[pc75]

Bonjour,

le résultat de mon code donne la dernière case cochées x 30

Ca me parait normal. Au lieu de faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
<% 
for i = 1 to Request.Form("choix").Count 
   session("res & i")= Request.Form("choix")(i) 
next 
%>

Tu devrais faire :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
 
<% 
for i = 1 to Request.Form("choix").Count 
   session("res" & i)= Request.Form("choix")(i) 
next 
%>

[isa21493]

merci mais ça ne change rien

[pc75]

Re,

Et dans ton dernier formulaire

Au lieu de :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
<% 
for i=1 to 30 
   R(i)  = session("res & i") 
   Response.Write(R(i)) 
next 
%>

==>

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
 
<% 
for i=1 to 30 
   R(i)  = session("res" & i) 
   Response.Write(R(i)) 
next 
%>

[isa21493]

ah oui parfait merci, ça marche

[isa21493]

j'ai un pb de compatibilité de type à la première ligne je ne sais pas pk:

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
<%for i=1 to 30
	R(i)  = session("res" & i)
	A(i) = session("activ" & i)
	TF(i) = session("TF" & i)
	RG(i) = session("RG" & i)
	TR(i) = session("TR" & i)
	I(i) = session("I" & i)
	TI(i) = session("TI" & i)
	C(i) = session("C" & i)
	E(i) = session("E" & i)
	TE(i) = session("TE" & i)
	S(i) = session("S" & i)
	Response.Write(R(i))
	Response.Write(A(i))
	Response.Write(TF(i))
	Response.Write(RG(i))
	Response.Write(TR(i))
	Response.Write(I(i))
	Response.Write(TI(i))
	Response.Write(C(i))
	Response.Write(E(i))
	Response.Write(TE(i))
	Response.Write(S(i))
next
%>

[pc75]

Re,

Essaie ça :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
 
R(i)  = session("res" & cstr(i))

[isa21493]

merci c bon ça marche