Request.form + variable

Salut je voudrais faire un truc de ce style :

Code:

---

1 2 3 4 5 6 7

dim k, Insert_ACTIVITES_PRESTATAIRES for k = 1 to 14 step 1 if not isnull(request.form(k)) and request.form(k) <> "" then ChaineSQL = "INSERT INTO ACTIVITES_PRESTATAIRES values ('" & addslashes(request.form("CODE")) & "', " & request.form(k) & ")" SET Insert_ACTIVITES_PRESTATAIRES = oConn.execute(ChaineSQL) end if next

---

Le k est bien incrémenté, mais le request.form(k) m'affiche n'importe quoi.
Donc ma question est : a t'on le droit de faire cela, de remplacer la chaine par une variable dans request.form() et si oui, est ce que je me suis gouré quelque art ? Merci de votre aide

K prend des valeurs entre 1 et 14.
Request.form(k) renvoie la valeur d'un champ du formulaire dont le nom vaut 1,2,...14
Exemple :

Code:

---

1 2 3 4 5 6

<form method="post"> <input name="1" value="test1"> <input name="2" value="test2"> ... <input name="14" value="test14"> </form>

---

Code:

---

1 2 3

for k = 1 to 14 step 1 response.write k & " = " & Request.form(k) &"<br>" Next

---

tu auras :
1 = test1
...
14 = test14

Si tu veux parcourir tous les champs d'un formaulaire, il faut faire :

Code:

---

1 2 3

for each strKey in Request.Form response.write strKey & " = " & Request.form(strKey ) &"<br>" Next

---

Merci mais j'ai changer de solution finalement :

Code:

---

1 2 3 4 5 6 7 8 9 10

SET mon_insert = oConn.execute(ChaineSQL) dim tableau, sep, sqlexe, k, Insert_ACTIVITES_PRESTATAIRES sep = "," if not isnull(request.form("activite")) and request.form("activite") <> "" then tableau = split(request.form("activite"),sep,-1,1) for k = 0 to ubound(tableau) step 1 sqlexe = "INSERT INTO ACTIVITES_PRESTATAIRES values ('" & addslashes(request.form("CODE")) & "', " & tableau(k) & ")" SET Insert_ACTIVITES_PRESTATAIRES = oConn.execute(sqlexe) next end if

---

En plus c'est plus dynamique comme cela :)