Cet article présente principalement l'utilisation de redim et de conserve dans ASP pour créer des instances de tableau dynamique. Cet article donne également d'autres exemples d'opérations de tableau dans ASP. Les amis qui en ont besoin peuvent s'y référer.
La fonction de REDIM dans asp est de définir dynamiquement la longueur du tableau
Une instruction dans un tableau dynamique ne peut apparaître que dans une procédure et peut être utilisée plusieurs fois. Vous pouvez modifier la taille et les dimensions du tableau.
Format:
Nom du tableau REDIM [Preserve] (indice 1 [indice 2....])
Preserve conserve le contenu du tableau dynamique (s'il n'est pas utilisé, toutes les instructions actuellement stockées seront perdues à chaque fois qu'une instruction REDIM est exécutée)
Par exemple:
Copiez le code comme suit :Dim DynArray() 'Définir le tableau DynArray() comme un tableau dynamique
REDIM Preserve DynArray(20)'Allouer un certain nombre d'éléments au tableau
Ceci est très important pour certains changements dynamiques dans les tableaux en programmation, et peut souvent être utilisé et traité. Ce REDIM a une compréhension approfondie du deuxième ordinateur et pense qu'il est très utile d'améliorer sa propre programmation.
Voici quelques exemples de tableaux ASP, bien entendu, tous ne sont pas des tableaux dynamiques.
Utilisation de tableaux dans la programmation ASP :
Définition du tableau :
Copiez le code comme suit :DimMonTableau
MonTableau = Tableau(1‚5‚123‚12‚98)
Tableau extensible :
Copiez le code comme suit :DimMonArray()
pour i = 0 à 10
ReDim Préserver MyArray(i)
MonTableau(i)=i
suivant
Divisez une chaîne et renvoyez un tableau de résultats fractionnés :
Copiez le code comme suit :DimMonTableau
MonTableau = Split(tempcnt‚chr(13)&chr(10))
Pour I = Lbound (MyArray) à Ubound (MyArray)
Réponse.Écrire MyArray(I) & <br>
Suivant
Fonction de tri de tableau :
Copiez le code comme suit :fonction..Trier(ary)
KeepChecking = VRAI
Faire jusqu'à ce que KeepChecking = FALSE
KeepChecking = FAUX
Pour I = 0 à UBound(ary)
Si I = UBound(ary) alors quittez pour
Si ary(I) > ary(I+1) Alors
PremièreValeur = ary(I)
SecondeValeur = ary(I+1)
ary(I) = SecondeValeur
ary(I+1) = PremièreValeur
KeepChecking = VRAI
Fin si
Suivant
Boucle
Trier = ary
Fin de fonction
Exemple d'application de la fonction de tri de tableau :
Copiez le code comme suit :DimMonTableau
MonTableau = Tableau(1‚5‚123‚12‚98)
MonTableau = Trier(MonTableau)
Pour I = Lbound (MyArray) à Ubound (MyArray)
Réponse.Écrire MyArray(I) & <br>
Suivant
Utilisation de tableaux dans l'application et la session :
Copiez le code comme suit :Application.Lock
Application (StoredArray) = MonTableau
Application.Déverrouiller
LocalArray = Application (StoredArray)
Écrasez le tableau dans Application :
Copiez le code comme suit :Application.Lock
Application (StoredArray) = LocalArray
Application.Déverrouiller
La méthode d'utilisation de Session est la même que celle d'Application, en important les données de la base de données dans le tableau :
Copiez le code comme suit :DimMonTableau
'Obtenir tous les enregistrements
MonTableau = RS.GetRows
'Obtenez les 10 premiers enregistrements
MonTableau = RS.GetRows(10)
Pour la ligne = 0 Vers UBound(MyArray‚ 2)
Pour col = 0 Vers UBound(MyArray‚ 1)
Response.Write (colonne‚ligne) & <br>
Suivant
Suivant
Grâce aux exemples ci-dessus, nous pouvons approfondir notre compréhension des tableaux et les utiliser de manière flexible dans des applications pratiques.