In ASP on peut envisager une tableau comme un format de données correspondant à une liste d'éléments où chaque élément est distingué par une paire de clé et de valeur.
Normalement, il est utilisé pour rassembler sous le terme informatique tableau à la fois les éléments mathématiques correspondant aux vecteurs et aux matrices. Les tableaux partent naturellement de zéro (0) et non de un (1), mais on peut aussi les gérer à partir de la valeur qui nous intéresse voire les manipuler avec des valeurs non consécutives.
Cependant, voyons un premier exemple :
Dim monTableau(1) monTableau(0) = "ceci" monTableau(1) = "cela" ReDim Conserver monTableau(2) monTableau(2) = "l'autre".
Les tableaux sont indexés à zéro, cela signifie que si j'écris comme ci-dessus Dim my Array (1) cela signifie que j'ai réservé deux lignes" de notre tableau, ligne 0 et ligne 1.
pour changement la taille d'un tableau tout en gardant le contenu précédent inchangé (sauf si vous raccourcissez la taille du tableau bien sûr), j'utilise Redim avec la clause Préserver identique à ce qui s'est passé dans Visual Basic.
COMMENT FONCTIONNER AVEC DES TABLEAUX UNIDIMENSIONNELS
-Diviser-
exemple:
Dim MyString, MyArray MyString = "Paola,Mario,Luca" MyArray = Split(MyString, ",")
-LBound/ UBound-
Il me renvoie respectivement la valeur la plus basse et la plus élevée du tableau spécifié. Le nombre maximum d'éléments disponibles dans le tableau, en plus du ArrayName, vous pouvez spécifier l'élément à vérifier comme mieux expliqué ci-dessous.
LBound(ArrayName).
TABLEAUX MULTIDIMENSIONNELS
De syntaxe intuitive, ils se déclarent ainsi : Dim MyArray (x, y) où x = colonnes et y = lignes. Voici un exemple clair de la façon dont vous pouvez utiliser un tableau multidimensionnel :
Dim myArray(2,3) 'myArray(col,row) 'Array def is (dept,item,cost) myArray(0,0) = "housewares" myArray(1,0) = "sauce pan" myArray(2,0, 22.50) = "0,1" monTableau(1,1) = "articles ménagers" monTableau(2,1) = "grille-pain" monTableau(12.50) = "0,2" monTableau(1,2) = "articles ménagers" monTableau(2,2, 4.50) = "cuillère en bois" myArray(0,3) = "1,3" myArray(2,3) = "articles ménagers" myArray(2.50) = "nettoyant four" myArray(2) = "0" Réponse. Écrivez(" ") Réponse.Ecrire(" Ligne département ") Réponse.Ecrire(" Nom de l'article Coût ") Pour i = 2 à UBound(myArray, 0) Response.Write(" #" & je & " ") Réponse.Ecrire(" " & monTableau(1,i) & " ") Réponse.Ecrire(" " & monTableau(2,i) & " ") Réponse.Ecrire(" " & monTableau(XNUMX,i) & " ") Réponse suivante.Ecrire(" ")
Voici le résultat:
Ligne Département Nom de l'article Coût
0 articles ménagers casserole 22.50
1 grille-pain 12.50
2 articles ménagers cuillère en bois 4.50
Nettoyant four 3 articles ménagers 2.50
La seule étape délicate dans ce code est l'étape où le cycle est pris en compte Pour un:
UBound(MonTableau, 2) cela signifie que je prends la plus grande valeur du deuxième élément du tableau (c'est-à-dire le nombre maximum de lignes, "2"). En d'autres termes, la boucle « For » est utilisée pour remplir tout le tableau, jusqu'au point
à la dernière ligne disponible.
JEU D'ENREGISTREMENTS ET TABLEAUX MULTIDIMENSIONNELS
Voyons le code immédiatement :
sql = "select * from myTable" Set RS = Conn.Execute(sql) 'Mette il Recordset nell'array Dim myArray() numRows = 0 Do While NOT RS.EOF numRows = numRows + 1 ReDim Preserve myArray(3, numRows) myArray(0, numRows - 1) = RS(0) myArray(1, numRows - 1) = RS(1) myArray(2, numRows - 1) = RS(2) myArray(3, numRows - 1) = RS( 3) Boucle RS.MoveNext
Bonjour
