ASP - Exibir todos os arquivos de uma pasta 


Oscar Pires é desenvolvedor ASP e Visual Basic, atualmente voltado para o e-commerce, e trabalha com sistemas para controle dos dados de lojas.

26/11/2001 - Coluna nº 12

ASP - Exibir todos os arquivos de uma pasta

Devido a diversos pedidos que recebi por email, este artigo tratará de uma forma simples, a exibição de todos arquivos que estiverem em uma determinada pasta.

O uso é simples, atraves de filesystemobject será feita a referência à pasta e depois um loop pelo objeto para pegar os valores.

Set FSO = Server.CreateObject("Scripting.FileSystemObject")
Set PASTA = FSO.Getfolder("c:\teste")
Set Arquivos = Pasta.Files
' criamos o objeto FSO, feita referência a pasta TESTE, e o objeto arquivos, é definido como os arquivos que existirem na pasta 

FOR EACH arquivo IN arquivos
response.write arquivo.name
NEXT
' aqui é usado um for each, que pegara absolutamente quaisquer arquivos no objeto arquivos (que é PASTA.files), e os exibirá enquanto houver.

Abraços e até semana que vem!

Oscar Pires
blade@imasters.com.br

Todos os direitos autorais dos artigos pertencem ao seu autor.