Listar diretórios(pastas(folders))

[kauebranco 0]

Pessoal como eu faria pra listar dinamicamente uma combo com os nomes de todos os diretórios que estão dentro de um ja determinado caminho ??por exemplo ..quero listar todos os diretórios que estão dentro de "C:/pasta_teste"usando FSO isso seria dificil ??alguem tem um exemplo ??vlw

[Marcelo Barcellos 0]

Set ObjFso = Server.CreateObject("Scripting.FileSystemObject")Set oFolder = ObjFso.getFolder("C:\nome_da_pasta")For Each subFolder in oFolderResponse.write subfolder.PathNext

Confirme se é "subFolder.Path" mesmo

[kauebranco 0]

Erro de tempo de execução do Microsoft VBScript (0x800A01B6)O objeto não dá suporte para a propriedade ou métodoo erro é nessa linha :For Each subFolder in oPastao que pode ser ???

[Marcelo Barcellos 0]

For Each subFolder in oFolder.subfoldersResponse.write subfolder.PathNext

Foi mal.

[kauebranco 0]

uuuuu ..legall ..funcionou beleza .. só mudei o "path" pra "name" que dai ele pegou só o nome das subfolders ..se eu quisesse pega todos os arquivos que tem ali seria só mudar pra :For Each VarFile in oFolder.files?????

[Marcelo Barcellos 0]

Isso mesmo.

[kauebranco 0]

se eu quiser listar todos as subfolders e files na mesma combo ...existe um comando sem ter que fazer dois FOR EACH que pegue tudo que tem dentro da pasta ??alguma coisa do tipo For Each Itens in oPasta.Itens??

[Marcelo Barcellos 0]

Cara..Acho que não. (Não tenho certeza).Vai ter que fazer dois FOR's

[Salgado 4]

Com certeza terá que usar 2 FOR's

[Mário Monteiro 179]

sei que é chover no molhado mas tambem não vejo como num unico laço