Definición de matriz
Dimmyarray
MyArray = array (1,5,123,12,98)
Matrices extendidas
DimmyArray ()
fori = 0to10
RedImPreservemyArray (i)
MyArray (i) = i
próximo
Dividir una cadena y devolver una matriz de resultados divididos
Dimmyarray
MyArray = split (tempcnt, chr (13) y chr (10))
Fori = lbound (myArray) toubund (myArray)
Response.WritemyArray (i) y "<br>"
Próximo
Función de clasificación de matriz
función..sort (ary)
Keepchecking = True
Dountilkeephecking = falso
Keepchecking = falso
Fori = 0toUbound (Ary)
Ifi = Ubound (ary) entoncesxitfor
Ifary (i)> ary (i+1) entonces
FirstValue = ary (i)
SecondValue = ary (i+1)
ary (i) = SecondValue
ary (i+1) = FirstValue
Keepchecking = True
Endif
Próximo
Bucle
Ordenar = ary
Función final ..
Ejemplo de aplicación de función de clasificación de matriz
Dimmyarray
MyArray = array (1,5,123,12,98)
MyArray = sort (myArray)
Fori = lbound (myArray) toubund (myArray)
Response.WritemyArray (i) y "<br>"
Próximo
Uso de matrices en aplicación y sesión
Application.lock
Aplicación ("StoredArray") = MyArray
Aplicación
LocalArray = aplicación ("StoredArray")
Sobrescribir matrices en la aplicación
Application.lock
Aplicación ("StoredArray") = LocalArray
Aplicación
La sesión se usa igual que la aplicación
Importar datos de la base de datos a una matriz
Dimmyarray
Saca todos los registros
MyArray = rs.getrows
Saca los primeros 10 registros
MyArray = rs.getrows (10)
Forrow = 0toUbound (MyArray, 2)
Forcol = 0toUbound (MyArray, 1)
Response.write (col, fila) y "<br>"
Próximo
Próximo