In ASP podemos considerar um ordem como um formato de dados correspondente a uma lista de elementos onde cada elemento é distinguido por um par de chave e valor.
Como regra, é comum coletar, sob o termo de computador array, os elementos matemáticos correspondentes aos vetores e às matrizes. Os arrays partem naturalmente de zero (0) e não de um (1), mas também podemos gerenciá-los a partir do valor que nos interessa ou mesmo manipulá-los com valores não consecutivos.
No entanto, vamos ver um primeiro exemplo:
Dim meuVetor (1) meuVetor (0) = "este" meuVetor (1) = "aquele" ReDim Preserve meuVetor (2) meuVetor (2) = "outro".
As matrizes são indexadas a zero, o que significa que se eu escrever como acima Dim my Array (1), significa que reservei duas linhas" de nossa matriz, linha 0 e linha 1.
para mudança o tamanho de uma matriz, mantendo o conteúdo anterior inalterado (a menos que você encurte o tamanho da matriz, é claro), eu uso Redim com a cláusula Preservar idêntico ao que aconteceu no Visual Basic.
COMO OPERAR COM DISPOSITIVOS UNIDIMENSIONAIS
-Dividir-
exemplo:
Dim MyString, MyArray MyString = "Paola, Mario, Luca" MyArray = Split (MyString, ",")
-LBound / UBound-
Ele me retorna os valores mais baixo e mais alto da matriz especificada, respectivamente. O número máximo de elementos disponíveis no array, além do ArrayName, você pode especificar o elemento a ser verificado conforme melhor explicado a seguir.
LBound (ArrayName).
ARRAYS MULTIDIMENSIONAL
De sintaxe intuitiva, eles se declaram da seguinte forma: Dim MyArray (x, y) onde x = colunas ey = linhas. Aqui está um exemplo claro de como você pode usar uma matriz multidimensional:
Dim meuArray (2,3) 'meuArray (col, linha)' Array def is (departamento, item, custo) meuArray (0,0) = "utilidades domésticas" meuArray (1,0) = "panela de molho" meuArray (2,0, 22.50) = "0,1" meuArray (1,1) = "utilidades domésticas" meuArray (2,1) = "torradeira" meuArray (12.50) = "0,2" meuArray (1,2) = "utilidades domésticas" meuArray (2,2, 4.50) = "colher de pau" meuArray (0,3) = "1,3" meuArray (2,3) = "utilidades domésticas" meuArray (2.50) = "limpador de forno" meuArray (2) = "0" Resposta. Escrever(" ") Response.Write (" Linha Departamento ") Response.Write (" Nome do item Custo ") Para i = 2 para UBound (myArray, 0) Response.Write (" #" & eu & " ") Response.Write (" "& meuArray (1, i) &" ") Response.Write (" "& meuArray (2, i) &" ") Response.Write (" "& meuArray (XNUMX, i) &" ") Próxima Resposta.Write (" ")
Aqui está o resultado:
Custo do nome do item do departamento da linha
0 panela de molho de utensílios domésticos 22.50
1 torradeira de utensílios domésticos 12.50
2 colheres de pau de utilidades domésticas 4.50
3 limpador de forno de utensílios domésticos 2.50
A única etapa complicada neste código é a etapa em que o ciclo é levado em consideração Para se qualificar para o :
UBound (MyArray, 2) isso significa que eu pego o maior valor do segundo elemento da matriz (ou seja, o número máximo de linhas, “2”). Em outras palavras, o loop “For” é usado para preencher toda a tabela, até o ponto
para a última linha disponível.
CONJUNTO DE REGISTRO MULTIDIMENSIONAL E ARRAYS
Vamos ver o código imediatamente:
sql = "select * from myTable" Set RS = Conn.Execute (sql) 'Mette il Recordset nell'array Dim myArray () numRows = 0 Do While NOT RS.EOF numRows = numRows + 1 ReDim Preserve myArray (3, numRows) myArray (0, numRows - 1) = RS (0) myArray (1, numRows - 1) = RS (1) myArray (2, numRows - 1) = RS (2) myArray (3, numRows - 1) = RS ( 3) RS.MoveNext Loop
tchau