Redimensionnement de tableau

Marsh Posté le 22-11-2003 à 12:51:18

voila, je déclare mon tableau

Redim panier(1,3)

...

et ensuite j'ai besoin de rajouter une ligne sans évidement perdre tout mon tableau je tente un :

Redim Preserve panier(UBound(panier)+1,3)

et j'ai un beau :

Erreur d'exécution Microsoft VBScript error '800a0009'

Indice en dehors de la plage

voila [:meganne] [:proy]

Reply

Marsh Posté le 22-11-2003 à 12:51:18

Reply

Marsh Posté le 23-11-2003 à 10:46:22

up

Reply

Marsh Posté le 23-11-2003 à 10:48:30

c'est beau quand même un langage interprété qui sort des erreurs plus incompréhensible qu'on ne peut avoir un langage compilé ...

Reply

Marsh Posté le 23-11-2003 à 12:45:47

Taz a écrit :

c'est beau quand même un langage interprété qui sort des erreurs plus incompréhensible qu'on ne peut avoir un langage compilé ...

:jap: entièrement d'accord, asp ca pux, mais c'est pour les cours donc j'ai pas le choix ... [:proy]

Reply

Marsh Posté le 23-11-2003 à 13:01:36

pourquoi "+"?

---------------
.: Clône de Drasche .:. Ebichuleys .:. Avec l'Aloe Vera je fais de beaux cacas [:dawa] .: www.oserselancer.com :.

Reply

Marsh Posté le 23-11-2003 à 14:03:10

Urd-sama a écrit :

pourquoi "+"?

Redim Preserve panier(UBound(panier)+1,3)

ben ché pas [:proy]

mais en fait je viens de découvrir que en vb on ne peut redimenssionner que une dimmension du tableau

impossible d'ajouter des lignes

bref, je doit m'y prendre autrement :sweat:

voila merci les gents :hello:

Reply

Marsh Posté le 23-11-2003 à 16:53:34

mais attends il me semble avoir fait un truc du meme accabit avec un tableau 2 dim
voila un copier-coller du code (remplissage du tableau)

Citation :

FOR each Fichier in objDossier.Files
redim preserve table_fichier(2,enregistrement)
table_fichier(2,enregistrement) = mid(Fichier.name,1,(instr(Fichier.name,"." )-1))
table_fichier(1,enregistrement) = mid(Fichier.name,(instr(Fichier.name,"." ))+1)
enregistrement=enregistrement+1
NEXT

bon dans mon cas j'avais un tableau de x sur 2 et pas x sur x

---------------
.: Clône de Drasche .:. Ebichuleys .:. Avec l'Aloe Vera je fais de beaux cacas [:dawa] .: www.oserselancer.com :.

Reply

Redimensionnement de tableau

Sujets relatifs:

Leave a Replay