Cómo contar subcarpetas en Visual Basic.

[aci]

hola a todos,

he podido capturar la cantidad de archivos que contiene una carpeta con:

Set FS2 = CreateObject("Scripting.FileSystemObject")
contCarpeta = FS2.GetFolder(nombreCarpeta).Files.Count

Pero conoceis cómo puedo saber la cantidad de subcarpetas que contiene una carpeta??

Puesto que si una carpeta contiene 3 ficheros y dos carpetas, sólo me muestra: 3.

¿Y sabeis cómo podría saber el nombre de estas carpetas?


Muchas gracias y saludos.
Alberto.

[RootK]

tendrías que entrar carpeta por carpeta e irlas barriendo (recorriendo) y ver cuales son carpetas y cuales archivos, y así sucesivamente.

Saludos

[aci]

Pero desde una aplicación de Visual Basic, yo ahora sólo sé que existe la carpeta:

C:\imagenes

pero no sé las carpetas que cuelgan de ella porque se van generando dinámicamente y lo que quiero es que desde la aplicación Visual Basic me detecte cuántas carpetas hay en un momento y qué nombre tienen.

En un momento puede haber:

C:\imagenes\alfredo
C:\imagenes\luis

y en otro:

C:\imagenes\alfredo
C:\imagenes\luis
C:\imagenes\antonio

querría usar algún método de Folders o algo así, me he perdido, para detectar la cantidad de carpetas y sus nombre.

Saludos y gracias a todos,
Alberto.


tendrías que entrar carpeta por carpeta e irlas barriendo (recorriendo) y ver cuales son carpetas y cuales archivos, y así sucesivamente.

[00000]

Set FS2 = CreateObject("Scripting.FileSystemObject")
Set carpeta = getfolder("C:\Mis Imagenes")
cuantas = carpeta.subfolders.count