Definição de matriz
Dimmyarray
MyArray = Array (1,5,123,12,98)
Matrizes estendidas
Dimmyarray ()
fori = 0to10
RedimpreserveMyarray (i)
Myarray (i) = i
próximo
Divida uma corda e retorne uma variedade de resultados divididos
Dimmyarray
MyArray = Split (Tempcnt, Chr (13) e Chr (10))
Fori = lbound (myarray) toubound (myarray)
Response.Writemyarray (i) & "<br>"
Próximo
Função de classificação da matriz
função .. sorte (ary)
KeepChecking = true
Dountilkeepchecking = false
KeepChecking = false
Fori = 0Toubound (ary)
Ifi = ubound (ary) thenExitfor
Ifary (i)> ary (i+1) então
FirstValue = ary (i)
SecondValue = ary (i+1)
ary (i) = SecondValue
ary (i+1) = FirstValue
KeepChecking = true
Endif
Próximo
Laço
Classy = ary
Função final ..
Exemplo de aplicação de função de classificação de matriz
Dimmyarray
MyArray = Array (1,5,123,12,98)
MyArray = Sort (MyArray)
Fori = lbound (myarray) toubound (myarray)
Response.Writemyarray (i) & "<br>"
Próximo
Usando matrizes no aplicativo e sessão
Application.lock
Application ("StoredArray") = MyArray
Application.unlock
LocalArray = Application ("StoredArray")
Substituir matrizes no aplicativo
Application.lock
APLICAÇÃO ("StoredArray") = LocalArray
Application.unlock
A sessão é usada da mesma forma que o aplicativo
Importar dados do banco de dados para uma matriz
Dimmyarray
Retire todos os registros
MyArray = Rs.getRows
Retire os 10 primeiros registros
MyArray = Rs.getRows (10)
Forrow = 0Toubound (MyArray, 2)
Forcol = 0Toubound (MyArray, 1)
Response.Write (Col, Row) & "<br>"
Próximo
Próximo