VBSCRIPT Inclure le résultat d'une variable dans un autre

Version imprimable

01/04/2005, 16h23
Grozeil

VBSCRIPT Inclure le résultat d'une variable dans un autre

Bonjour je voudrais simplifier ce traitement avec une boucle est-ce possible:

FrontPage_Form1.T1_text.value = whe(1)
FrontPage_Form1.T2_text.value = whe(2)
FrontPage_Form1.T3_text.value = whe(3)
FrontPage_Form1.T4_text.value = whe(4)
FrontPage_Form1.T5_text.value = whe(5)
FrontPage_Form1.mini1.value = Mini(1)
FrontPage_Form1.maxi1.value = Maxi(1)
FrontPage_Form1.mini2.value = Mini(2)
FrontPage_Form1.maxi2.value = Maxi(2)
FrontPage_Form1.mini3.value = Mini(3)
FrontPage_Form1.maxi3.value = Maxi(3)
FrontPage_Form1.mini4.value = Mini(4)
FrontPage_Form1.maxi4.value = Maxi(4)
FrontPage_Form1.mini5.value = Mini(5)
FrontPage_Form1.maxi5.value = Maxi(5)
04/04/2005, 13h28
pmboutteau
tu voudrais faire quoi?

Un truc du style
Code:

1 2 3 4 For i=1 to 5 FP_Form1.Ti-text_value=whe(i) FP_From1.minii.value=Mini(i) FP-From1;maxii.value=Maxi(i)
Tu peux créer un tableau ou une liste peut_être où tu met des variables et aprés tu lance une boucle 'pour' pour leur appliquer Whe(n de la case du tableau).

En C ou en Java j'aurai fait comme çà mais en ASP j'ai jamais eu le problème.

Salut
Si j'ai bien compris, il faudrait faire ça :

HTML :

Code:

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
<form method="post" name="FrontPage_Form1" action="">
	<input type="text" name="T1_text" value="">
	<input type="text" name="T2_text" value="">
	<input type="text" name="T3_text" value="">
	<input type="text" name="T4_text" value="">
	<input type="text" name="T5_text" value=""><br>
	<input type="text" name="mini1" value="">
	<input type="text" name="mini2" value="">
	<input type="text" name="mini3" value="">
	<input type="text" name="mini4" value="">
	<input type="text" name="mini5" value=""><br>
	<input type="text" name="maxi1" value="">
	<input type="text" name="maxi2" value="">
	<input type="text" name="maxi3" value="">
	<input type="text" name="maxi4" value="">
	<input type="text" name="maxi5" value="">
</form>

VBSCRIPT :

Code:

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
<script language="vbscript">
	dim whe(5)
	dim mini(5)
	dim maxi(5)
	dim i, instruction
 
	whe(1) = "a"
	whe(2) = "b"
	whe(3) = "c"
	whe(4) = "d"
	whe(5) = "e"
	mini(1) = "1"
	mini(2) = "2"
	mini(3) = "3"
	mini(4) = "4"
	mini(5) = "5"
	maxi(1) = "6"
	maxi(2) = "7"
	maxi(3) = "8"
	maxi(4) = "9"
	maxi(5) = "10"
 
	for i = 1 to 5
		execute "FrontPage_Form1.T" & i & "_text.value = """ & whe(i) & """"
		execute "FrontPage_Form1.mini" & i & ".value = """ & mini(i) & """"
		execute "FrontPage_Form1.maxi" & i & ".value = """ & maxi(i) & """"
	next
</script>

04/04/2005, 15h39
pmboutteau

Je pense que çà çà marche.

A grozeil de tester.
05/04/2005, 11h47
Grozeil

Merci à vous, ça marche à merveille!
Je vais pouvoir simplifier tous mes traitements!!!

Grozeil
05/04/2005, 11h53
Hell

Pas de quoi :)
Bon courage