Hola amigos...
tengo lo siguiente
Dim objFileUsuarios As Scripting.FileSystemObject
Dim objFiles As Scripting.File
Dim strFileNombre As String
dim strdir as string
strdir="c:\Prueba"
Set objFileUsuarios = CreateObject("scripting.filesystemObject")
For Each objFiles In objFileUsuarios.GetFolder(strDir).Files
strFileNombre = objFiles.Name
Next
lo cual traigo todos los nombres de los archivos que contiene Prueba... pero no las carpetas..
como puedo obtener el nombre de las carpetas.. que contenga el directorio Prueba...
Gracias
