Array Multidimencional

[Snork]

alguém tem um exemplo de array multidimencional para me mostrar pois não sei como usar .... valeu

[cyberalexxx]

olha aki um exemplo, pega todos os nomes de todos os arquivos de um diretorio e coloca em uma array:

<%Set FSO = Server.CreateObject("Scripting.FileSystemObject")

Set principal = FSO.GetFolder("c:\intranet") ' coloque a pasta principal

Set arquivos = principal.Files

'criando vetor

dim nome

nome=array()

For each arq in arquivos

redim preserve nome(Ubound(nome)+1)

nome(Ubound(nome)) = arq.name

next

'listando arquivos

for x = 0 to Ubound(nome) 

  response.write nome(x) & "<br>"

next

%>

[Snork]

valeu !!!

[Graymalkin]

Você pode fazer uma matriz colocando um elemento do vetor como um vetor também (ou seja, vetor de vetores == matriz). Exemplo:

dim vetor

vetor = array(array("Teste1", 1), array("Teste2", 2))

for i=lbound(vetor, 1) to ubound(vetor, 1)
  for j=lbound(vetor, 1) to ubound(vetor, 1)
    msgbox vetor(i)(j)
  next
next

Abraços,

Graymalkin

[cyberalexxx]

valeu !!!

beleza!!

To fechando o tópico, qualquer duvida, manda PM que eu abro o tópico.

Abraçõs