Discussion :

[newpress]

Bonjour, je pensais simple se problème au début de mon projet mais je trouve bloqué. J'ai créé 10 tableaux et je voulais suivant la section du site utiliser un seul tableau. Et pour cela je voulais appeler mon tableau dynamiquement.

Exemple

Code :

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

1
2
3
4
5
6
7
8
For i=0 To Ubound(arr & idDeMaPag)
 
Next
 
arr0 = Array("W","D","F")
arr1 = Array("W","D","F")
arr2 = Array("W","D","F")
arr3 = Array("W","D","F")

Mais voila rien ne marche. J'ai bien essayé plusieurs choses mais rien n'y fait. Est-ce que quelqu'un à déjà eu ce problème ou a une solution?

Merci
jp

[roro06]

Bonjour

1 - La gestion des tableaux en vbscript n'est pas terribles. Dans la mesure du possible, je te conseille de faire une nouvelle analyse et de modifier le fonctionnement de ta page.

Dans l'urgence, si le nombre de tableaux est fixe et connu, mieux faire :

Code :

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

1
2
3
4
5
6
7
8
9
10
11
if idDeMaPage=0 then
    arr=Array("W","D","F")
else 
    if idDeMaPage=1 then
        arr=Array("T", "D", "C")

' Ainsi de suite

    end if
end if

Avantage immédiat : à l'exécution, un seul tableau est défini.


2 - Si j'ai bien interprété ce que tu essaie de faire ici :

For i=0 To Ubound(arr & idDeMaPage)

tu peux regarder la fonction Eval de vbscript, qui permettrait ce genre de choses. Un petit exemple à tester da,s un script vbs :

Code :

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

1
2
3
4
5
6
7
 
r0=0
r1=10101
r2=100455 
 
v=1
eval("msgbox(r" & v & ")")

va afficher 10101 (car v=1) mais 100455 si on change la valeur de v=2

dans ton cas, ca ressemblerait à :

Code :

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

1
2
 
Eval("for i=0 to ubound(arr" & idDeMaPag & ")")

Disons que c'est un peu ... caca, comme solution

[newpress]

Bonjour roro06, merci pour ta réponse. Puisque je ne connais pas le nombre de tableau que je vais avoir. J'ai essayé ta deuxième solution mais cela ne marche par. je suis suppose que cela vient du fait que je suis en VB et non JS.

J'ai bien essayé Eval("for i=0 to ubound(arr" & idDeMaPag & ")")

As une idée pourquoi ?

Merci
jp

[newpress]

Bon et bien merci roro06 tu m'as mis sur la piste. Voici ci-dessous ce que j'ai fait.

Code :

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

1
2
3
4
5
6
7
arr1 = Array("971","970","972","970","971") 
idDeMaPag=1
temp = Eval("arr"& idDeMaPag &"")
 
for i=0 to ubound(temp)
    Response.Write temp(i) & "<br />"
Next