FiveTech Support Forums

FiveWin / Harbour / xBase community
Board index FiveWin para Harbour/xHarbour descomprimir directorios vacios
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
descomprimir directorios vacios
Posted: Mon Sep 15, 2014 03:40 PM
Hola.
TEngo un test.zip que contiene archivos y directorios, busque en el foro y vi este ejemplo:

Code (fw): Select all Collapse
   aFiles := hb_GetFilesInZip("datos.zip")
   hb_unzipfile("datos.zip",,.T.,,"d:\temporal",aFiles,NIL)


pero no me descomprime las carpetas vacias...
que hago mal?

gracias.
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: descomprimir directorios vacios
Posted: Mon Sep 15, 2014 04:16 PM
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: descomprimir directorios vacios
Posted: Mon Sep 15, 2014 04:53 PM

la verdad que lei esos post pero no me solucionan el problema.

Descomprimo, pero no me descomprime las carpetas vacias.

gracias.

FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: descomprimir directorios vacios
Posted: Mon Sep 15, 2014 07:32 PM
Carpetas Vacias? No comprendo.

Pide a Carlos Vargas de Nicarágua el XBACKUPLITE de su autoria, excelente para Backups.

Code (fw): Select all Collapse
/*Procedimiento principal*/
FUNCTION XBLITE() //->MAIN()

   MEMVAR cPRGPATH, cFILEPATH

   cPRGPATH := cFILEPATH(GETMODULEFILENAME(GETINSTANCE()))
   cPRGPATH := cShortName(cPRGPATH)

   XBACKUPLITE()

   lCHDIR(cPRGPATH)

RETURN NIL


Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341
Posts: 1956
Joined: Fri Oct 07, 2005 07:08 PM
Re: descomprimir directorios vacios
Posted: Mon Sep 15, 2014 07:52 PM
d:\
|
+- carpeta 2
| archiivo1
| archivo2
|
+ carpeta 3
+----- carpeta 4
|
|

cuando se descomprime debe tener la estructura de arriba, carpeta 4 no contiene archivos pero igual debe de aparecer,
cuando uso ese ejemplo que puse mas arriba carpeta 4 no se crea, o sea, en el .zip existe esa carpeta pero no la descomprime
FWH 21.02
Harbour 3.2.0dev (r2104281802)
Copyright (c) 1999-2021, https://harbour.github.io/
Posts: 8515
Joined: Tue Dec 20, 2005 07:36 PM
Re: descomprimir directorios vacios
Posted: Mon Sep 15, 2014 08:09 PM
Intenta asi:

Code (fw): Select all Collapse
   hb_unzipfile( "datos.zip",,.T.,,"d:\temporal", aFiles + "\" )


Saludos.
João Santos - São Paulo - Brasil - Phone: +55(11)95150-7341

Continue the discussion