Un tableau ASP peut être redimensionné
Voilà une solution aux erreurs suivantes « This array is fixed or temporarily locked » ou « Tableau fixe ou temporairement verrouillé » sur le redimensionnement d’un tableau à deux dimensions :
Dim a
Redim a(3,0)
au lieu de
Dim a(3,0)
Il faut dimensionner le tableau à une dimension, puis lui ajouter la deuxième avec un redim
ensuite, on peut faire
<%
Dim a
Redim a(3,0)
‘Dim a(3,0)
fc = split(« toto,titi,tutu,tyty », », »)
For Each f In fc
Redim Preserve a(3,UBound(a,2)+1)
a(1,UBound(a,2)) = f
a(2,UBound(a,2)) = f
a(3,UBound(a,2)) = f
Next
%>
Dim a ‘Déclaration du tableau
Redim a(3,0) ‘redimensionnement du tableau
fc = split(« toto,titi,tutu,tyty », », »)
For Each f In fc
Redim Preserve a(3,UBound(a,2)+1) ‘redimensionnement de la dernière dimension uniquement
a(1,UBound(a,2)) = f
a(2,UBound(a,2)) = f
a(3,UBound(a,2)) = f
Next
