Problemas con ZIP

[Marcelo Via Giglio]

Holas,

tengo un problema con HB_UNZIPFILE, si bien esto es de xHabour, estoy utilizando el xHabour que venia con FWH8.04, pero no extracta los archivos, lo estoy utilizando de la siguiente manera

aExtract := hb_GetFilesInZip( cFile )
HB_UNZIPFILE( cFile ,,,,CurDrive()+':\'+CurDir(), aExtract )

En aExtract se tiene todos los archivos del ZIP (cFile) pero no se llegan a extraer, he probado como destino ".\" y otras cosas mas , pero nada.

Alguna idea??

saludos

Marcelo

[Marcelo Via Giglio]

Holas,

solucionado actualizando la version de xHabour (una que encontre en el sitio de FT que parece ser del 26 de junio) + la libreia zlib + actualizar las LIB de ADS a 8.1 para que arranque el XH sin gritar.

Ahora mi problema, tendria que compilar mis propias ADS.LIB para que jale con ADS 7.1, alguien ya las tiene?

Bueno gracias por la atencion

saludos

Marcelo

Holas,

tengo un problema con HB_UNZIPFILE, si bien esto es de xHabour, estoy utilizando el xHabour que venia con FWH8.04, pero no extracta los archivos, lo estoy utilizando de la siguiente manera

aExtract := hb_GetFilesInZip( cFile )
HB_UNZIPFILE( cFile ,,,,CurDrive()+':\'+CurDir(), aExtract )

En aExtract se tiene todos los archivos del ZIP (cFile) pero no se llegan a extraer, he probado como destino "." y otras cosas mas , pero nada.

Alguna idea??

saludos

Marcelo

[mmercado]

tengo un problema con HB_UNZIPFILE, si bien esto es de xHabour, estoy utilizando el xHabour que venia con FWH8.04, pero no extracta los archivos, lo estoy utilizando de la siguiente manera

aExtract := hb_GetFilesInZip( cFile )
HB_UNZIPFILE( cFile ,,,,CurDrive()+':\'+CurDir(), aExtract )

Hola Marcelo:

Como yo lo hago funciona y es mas o menos de la siguiente manera:

Code: Select all  Expand view  RUN

   aFiles := hb_GetFilesInZip( cFile, .T. )
   aExtract := {}
   AEval( aFiles, {|e| AAdd( aExtract, e[ 1 ] ) } )
   HB_UNZIPFILE( cFile ,,,,CurDrive()+':'+CurDir(), aExtract )


Espero te sirva, un abrazo.

Manuel Mercado

[Marcelo Via Giglio]

Manuel,

como siempre gracias por tus consejos, lo solucione cambiando de xHarbour

un abrazo

Marcelo