Este artículo presenta principalmente el uso de redim y preserve en ASP para crear instancias de matriz dinámica. Este artículo también brinda otros ejemplos de operación de matriz en ASP. Los amigos que lo necesiten pueden consultarlo.
La función de REDIM en asp es definir dinámicamente la longitud de la matriz
Una declaración en una matriz dinámica solo puede aparecer en un procedimiento y puede usarse varias veces. Puede cambiar el tamaño y las dimensiones de la matriz.
Formato:
REDIM [Conservar] nombre de la matriz (subíndice 1 [subíndice 2....])
Preservar conserva el contenido de la matriz dinámica (si no se utiliza, todas las declaraciones almacenadas actualmente se perderán cada vez que se ejecute una declaración REDIM)
Por ejemplo:
Copie el código de código de la siguiente manera:Dim DynArray() 'Define la matriz DynArray() como una matriz dinámica
REDIM Preserve DynArray(20)'Asigne una cantidad de elementos a la matriz
Esto es muy importante para algunos cambios dinámicos en las matrices en la programación y, a menudo, se puede usar y procesar. Este REDIM tiene un conocimiento profundo de la segunda computadora y cree que es muy útil para mejorar su propia programación.
A continuación se muestran algunos ejemplos de matrices ASP; por supuesto, no todas son matrices dinámicas.
Usando matrices en programación ASP:
Definición de matriz:
Copie el código de código de la siguiente manera:DimMyArray
Mimatriz = Matriz(1,5,123,12,98)
Matriz ampliable:
Copie el código de código de la siguiente manera:DimMyArray()
para i = 0 a 10
ReDim Preservar MyArray(i)
Mimatriz(i)=i
próximo
Divide una cadena y devuelve una serie de resultados divididos:
Copie el código de código de la siguiente manera:DimMyArray
Mimatriz = Dividir(tempcnt‚chr(13)&chr(10))
Para I = Lbound(MyArray) a Ubound(MyArray)
Respuesta.Escribir MyArray(I) & <br>
Próximo
Función de clasificación de matrices:
Copie el código de código de la siguiente manera:función..Ordenar(ario)
Seguir comprobando = VERDADERO
Hacer hasta que KeepChecking = FALSO
Seguir comprobando = FALSO
Para I = 0 a UBound(ary)
Si I = UBound(ary) entonces salga por
Si ary(I) > ary(I+1) Entonces
PrimerValor = ario(I)
SegundoValor = ario(I+1)
ario(I) = SegundoValor
ario(I+1) = PrimerValor
Seguir comprobando = VERDADERO
Terminar si
Próximo
Bucle
ordenar = ario
Función final
Ejemplo de aplicación de la función de clasificación de matrices:
Copie el código de código de la siguiente manera:DimMyArray
Mimatriz = Matriz(1,5,123,12,98)
Mimatriz = Ordenar(Mimatriz)
Para I = Lbound(MyArray) a Ubound(MyArray)
Respuesta.Escribir MyArray(I) & <br>
Próximo
Usando matrices en Aplicación y Sesión:
Copie el código de código de la siguiente manera:Bloqueo de aplicación
Aplicación (StoredArray) = MyArray
Aplicación.Desbloquear
LocalArray = Aplicación (StoredArray)
Sobrescriba la matriz en la Aplicación:
Copie el código de código de la siguiente manera:Bloqueo de aplicación
Aplicación (StoredArray) = LocalArray
Aplicación.Desbloquear
El método de uso de Sesión es el mismo que el de Aplicación, importando datos de la base de datos a la matriz:
Copie el código de código de la siguiente manera:DimMyArray
'Obtener todos los registros
Mimatriz = RS.GetRows
'Obtener los primeros 10 registros
Mimatriz = RS.GetRows(10)
Para fila = 0 a UBound(MyArray‚ 2)
Para col = 0 a UBound(MyArray‚ 1)
Response.Write (fila de columna) & <br>
Próximo
Próximo
A través de los ejemplos anteriores, podemos profundizar nuestra comprensión de las matrices y utilizarlas de manera flexible en aplicaciones prácticas.