Profundidad de niveles de carpetas

Profundidad de niveles de carpetas

Postby Pedro » Fri Mar 30, 2012 7:07 pm

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
Un saludo
Pedro
gahetesoft@gmail.com
FWH12.06 BCC582, Xverce CW, Pelles C 6.00.4,PSPAD 4.54
y ahora con ADO
User avatar
Pedro
 
Posts: 464
Joined: Tue Mar 21, 2006 7:30 pm
Location: Córdoba (España)

Re: Profundidad de niveles de carpetas

Postby Raymundo Islas M. » Fri Mar 30, 2012 7:42 pm

Pedro,

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

Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Re: Profundidad de niveles de carpetas

Postby Pedro » Fri Mar 30, 2012 8:10 pm

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".
Un saludo
Pedro
gahetesoft@gmail.com
FWH12.06 BCC582, Xverce CW, Pelles C 6.00.4,PSPAD 4.54
y ahora con ADO
User avatar
Pedro
 
Posts: 464
Joined: Tue Mar 21, 2006 7:30 pm
Location: Córdoba (España)

Re: Profundidad de niveles de carpetas

Postby Raymundo Islas M. » Fri Mar 30, 2012 9:32 pm

Pedro

Entonces, que te parece DirectoryRecurse( "*.*" )

Nomas le quitas los nombres de archivos.

Saludos
FWH 10.6 + xHarbour + Borland 582
User avatar
Raymundo Islas M.
 
Posts: 592
Joined: Tue Mar 14, 2006 11:34 pm
Location: Acapulco, Gro. MEXICO

Re: Profundidad de niveles de carpetas

Postby Pedro » Sat Mar 31, 2012 7:20 am

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.
Un saludo
Pedro
gahetesoft@gmail.com
FWH12.06 BCC582, Xverce CW, Pelles C 6.00.4,PSPAD 4.54
y ahora con ADO
User avatar
Pedro
 
Posts: 464
Joined: Tue Mar 21, 2006 7:30 pm
Location: Córdoba (España)


Return to FiveWin para Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 46 guests