FiveTech Support Forums

Hola a todos

Pues eso, cómo puedo saber y cómo podría grabarlo en una dbf o ponerlo en un array, de uno en uno todas las Subcarpetas que hay dentro de una Carpeta.
Para que os hagáis una idea os pongo este ejemplo

Con cFilePath(GETMODULEFILENAME(GETINSTANCE())) obtenemos la carpeta donde tenemos nuestro programa, algo asi : C:\MICARPETA\donde tengo mi aplicación. Pues bien suponed que hay más carpetas dentro de esa carpeta que es C:\MICARPETA por ejemplo la carpeta TEMP, INF, 0001, 0002, BMP, etc y que dentro de algunas de ellas haya otras carpetas.
He supuesto que no vamos a tener más de 10 niveles, por lo cual lo que me gustaría es obtener algo así
NIVEL1 NIVEL2 NIVEL3 NIVEL4 NIVEL5 .... hasta el 10
CARPETA1 SUBCARPETA SUBCARPETA1 SUBCARPETA2 SUBCARPETA3 aquí llegaremos sólo hasta el nivel que tenga de profundidad
C:\MICARPETA\ 0001\ COPIA\ 2312\ 1235

Alguien me puede echar una manita en esto? Si no queréis hacerlo por aqui lo podemos hacer por email o MSN

Pedro,

Creo que te servira el ejemplo que hizo Daniel : ListBar en SAMPLES.

Saludos

Hola Raimundo

Ese ejemplo no me vale, primero por que solo extrae una carpeta, y yo necesito todo el árbol completo. Ese ejemplo es casi el mismo que el xbrwdisc aunque este último es más completo y sería lo que yo necesitara pero sin tener que dar enter para extraer el siguiente nivel de carpeta. Lo necesito de manera automática, que el programa saque esos niveles, para comprobarlos en otra unidad y si una carpeta no existe crearla, pero dentro de su nivel y de sus carpetas "padres".

Pedro

Entonces, que te parece DirectoryRecurse( "." )

Nomas le quitas los nombres de archivos.

Saludos

Raimundo, eso ya lo estoy usando y atrapo en un array todos los ficheros, como tu dices le quito después el nombre del fichero y me queda la ruta, después, de esa ruta puedo extraer cada uno de las carpetas pero.....y aquí va el problema ¿cómo diablos meto cada una de las carpetas en el campo correspondiente de la dbf o en su lugar en un array?

Esto es precisamente lo que me trae de cabeza, quizás podría intentarlo de manera chapucera con diez funciones, una para cada nivel. Recurrí a vosotros por si había alguna otra forma menos artesanal.