Uso de Archivos ZIP y Unzip
Uso de Archivos ZIP y Unzip
Hola a todos de Nuevo, he querido usar los ejemplos que biene de testzip.prg y no se pueden usar con harbour, me marca unos archivos faltantes, localice la libreria que por aqui se mencionan de hbzip.lib y esta para xharbour, pero de nuevo sigue marcando los mismos errores, no se si por ahi se me paso algo que no alcanse a ver.
Les agradeceria quien me pueda orientar para su uso con harbour
Gracias
Carlos I De La Rosa
carloslmm@hotmail.com
Los Mochis, Sin.
Mexico
Les agradeceria quien me pueda orientar para su uso con harbour
Gracias
Carlos I De La Rosa
carloslmm@hotmail.com
Los Mochis, Sin.
Mexico
- Manuel Aranda
- Posts: 561
- Joined: Wed Oct 19, 2005 8:20 pm
- Location: España
Re: Uso de Archivos ZIP y Unzip
Antes de hbzip.lib tienes que enlazar la librería pcrepos.lib
Un saludo,
Manuel
xH 1.2.3, FWH 14.09, BC++ 5.8.2, xVerce CW 1.0, PellesC
Manuel
xH 1.2.3, FWH 14.09, BC++ 5.8.2, xVerce CW 1.0, PellesC
Re: Uso de Archivos ZIP y Unzip
Gracias Manuel por tu respuesta, pero aun sigue pidiendo los archivos
son los siguientes
_HB_FUN_ZIPFILE
_HB_FUN_ZIPTYPE
_HB_FUN_ZIPBLOCK
_HB_FUN_ZIPMSG
EL srchivo es el de samles testzip.prg
Gracias.
son los siguientes
_HB_FUN_ZIPFILE
_HB_FUN_ZIPTYPE
_HB_FUN_ZIPBLOCK
_HB_FUN_ZIPMSG
EL srchivo es el de samles testzip.prg
Gracias.
Re: Uso de Archivos ZIP y Unzip
Dear Mr.Carlos
To use Zip & Unzip functions in xHarbour you have to link hbzip.lib and zlib.lib
Both the lib files are available in your \xHarbour\Lib folder
http://forums.fivetechsupport.com/viewt ... 033#p94332
Regards
Anser
To use Zip & Unzip functions in xHarbour you have to link hbzip.lib and zlib.lib
Both the lib files are available in your \xHarbour\Lib folder
http://forums.fivetechsupport.com/viewt ... 033#p94332
Regards
Anser
Re: Uso de Archivos ZIP y Unzip
Te agradesco tu Respuesta pero aun asi siguen sin funcionar, creo que lo dejare por la paz de momento por ahi lei que habia utilerias para harbour me voy a buscar una.
Gracias de Cualesquier forma a Todos
Saludos
Gracias de Cualesquier forma a Todos
Saludos
- Biel EA6DD
- Posts: 680
- Joined: Tue Feb 14, 2006 9:48 am
- Location: Mallorca
- Contact:
Re: Uso de Archivos ZIP y Unzip
En mi blog tienes un articulo que explica como usar ZIP con Harbour.
http://bielsys.blogspot.com/2009/08/usa ... -dede.html
http://bielsys.blogspot.com/2009/08/usa ... -dede.html
Re: Uso de Archivos ZIP y Unzip
Biel Muchisimas gracias
Seguro con esto lo saco adelante, ya lei tu informacion y esta completa, Te agradesco mucho y tambien a los demas compañeros.
Por ahi ya hace tiempo tambien comentaba contigo lo de las camaras y me recomendaste las de axis, no se si ultimamente realizaste pruebas con las funciones de the full y otro colega que realizo una funcion de twebcam32 y con camaras normalitas y tarjetas capturadoras de video funcionan perfetamente para tener de 1 hasta 4 o dependiendo de la capturadora de video las que tenga.
Gracias a todos de nuevo y seguimos en contacto
Carlos I. De La Rosa.
carloslmm@hotmail.com
Seguro con esto lo saco adelante, ya lei tu informacion y esta completa, Te agradesco mucho y tambien a los demas compañeros.
Por ahi ya hace tiempo tambien comentaba contigo lo de las camaras y me recomendaste las de axis, no se si ultimamente realizaste pruebas con las funciones de the full y otro colega que realizo una funcion de twebcam32 y con camaras normalitas y tarjetas capturadoras de video funcionan perfetamente para tener de 1 hasta 4 o dependiendo de la capturadora de video las que tenga.
Gracias a todos de nuevo y seguimos en contacto
Carlos I. De La Rosa.
carloslmm@hotmail.com
- ruben Dario
- Posts: 986
- Joined: Thu Sep 27, 2007 3:47 pm
- Location: Colombia
Re: Uso de Archivos ZIP y Unzip
Para complilar con xharbour con FWH 8.03 que librerias debo usar.
Deacuerdo a los comentarios se debe usar la libreria hbzip.lib y el pcrepos.lib
Al compilarlo me genera este error.
Error: Unresolved external '_inflateEnd' referenced from
Error: Unresolved external '_deflate' referenced from
Error: Unresolved external '_get_crc_table' referenced from
Error: Unresolved external '_deflateEnd' referenced from
Error: Unresolved external '_deflateInit2_' referenced from
Error: Unresolved external '_crc32' referenced from
Error: Unresolved external '_inflateInit2_' referenced from
Error: Unresolved external '_inflate' referenced from
Sera que me falta otra libreria.
Porque las que decen en la documentacion no las tiene la version de xharbour que tengo.
Alguien tiene las librerias necesarias para poder compilar.
Gracias
Deacuerdo a los comentarios se debe usar la libreria hbzip.lib y el pcrepos.lib
Al compilarlo me genera este error.
Error: Unresolved external '_inflateEnd' referenced from
Error: Unresolved external '_deflate' referenced from
Error: Unresolved external '_get_crc_table' referenced from
Error: Unresolved external '_deflateEnd' referenced from
Error: Unresolved external '_deflateInit2_' referenced from
Error: Unresolved external '_crc32' referenced from
Error: Unresolved external '_inflateInit2_' referenced from
Error: Unresolved external '_inflate' referenced from
Sera que me falta otra libreria.
Porque las que decen en la documentacion no las tiene la version de xharbour que tengo.
Alguien tiene las librerias necesarias para poder compilar.
Gracias
Re: Uso de Archivos ZIP y Unzip
anserkk wrote:Dear Mr.Carlos
To use Zip & Unzip functions in xHarbour you have to link hbzip.lib and zlib.lib
Both the lib files are available in your \xHarbour\Lib folder
http://forums.fivetechsupport.com/viewt ... 033#p94332
Regards
Anser
Re: Uso de Archivos ZIP y Unzip
Amigos
retomo este hilo porque no le encuentro la vuelta al intentar descomprimir
Mi fuente esta basado en el sample de Biel, ahora bien el proceso de comprimir lo hace perfectamente. Lo que no logro es que descomprima!
Ni siquiera con el sample; el codigo es:
La linea resaltada la puse para comprobar y, obviamente da verdadero.
También, leyendo otros post, puse hbzip.lib y zlib.lib antes de las five, sin exito
estoy usando xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6717)
alguna sugerencia?
retomo este hilo porque no le encuentro la vuelta al intentar descomprimir
Mi fuente esta basado en el sample de Biel, ahora bien el proceso de comprimir lo hace perfectamente. Lo que no logro es que descomprima!
Ni siquiera con el sample; el codigo es:
Code: Select all
STATIC FUNCTION Descomprime(cFile)
LOCAL oDlg,nFiles,oText, cMsg, lVal, oMeter,nActual:=0
nFiles:=Len(hb_GetFilesInZip(cFile))
DEFINE DIALOG oDlg FROM 1, 1 TO 10, 60 TITLE "Espere ejecutando recuperación de datos..."
@ 0.5, 2 SAY oText VAR cMsg SIZE 180, 20 OF oDlg
@ 2, 2 METER oMeter VAR nActual TOTAL 100 OF oDlg SIZE 200, 20
[b]? "Existe", File( cfile ), cfile[/b]
oDlg:bStart:={||lVal:=Hb_UnZipFile('bdcentral.zip',{|cFile,nPos|oText:SetText('Descomprimiendo'+CRLF+cFile),;
nActual:=nPos/nFiles*100,oMeter:Set(nActual)} ),;
IF(lVal,MsgInfo('Restauracion completada con éxito'+CRLF+CRLF,'Bielsys 2009'),;
MsgStop('No se han podido restaurar los datos')),;
oDlg:END()}
ACTIVATE DIALOG oDlg CENTERED
RETURN NIL
También, leyendo otros post, puse hbzip.lib y zlib.lib antes de las five, sin exito
estoy usando xHarbour Compiler build 1.2.1 (SimpLex) (Rev. 6717)
alguna sugerencia?
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
Chaco - Argentina
Re: Uso de Archivos ZIP y Unzip
The below given code is Working fine for me (xHarbour).
Regards
Anser
Code: Select all
....
.....
cDrive:="D:"
@05,14 BUTTONBMP oBtnInstall PROMPT "Install on "+cDrive+" Drive" TEXTRIGHT SIZE 50,20 ;
ACTION { lOk:=ExtractZip(cDrive) }
*------------------------------------*
Function ExtractZip(cDrive)
*------------------------------------*
Local aFiles,lOk,cDriveLetter
// Zip and Unzip functions, should include the libs named HbZip & zlib available in \xHarbour\lib
cDriveLetter:=cDrive+"\"
// Array containing the list of files in the Zip with Path
aFiles := hb_GetFilesInZip("Sam.ans")
// The 3rd Parameter should be .T. if you need to extract contents of zip file as per Path
lOk := hb_unzipfile("Sam.ans",,.T.,,cDriveLetter,aFiles,NIL)
Return lOk
Anser
Re: Uso de Archivos ZIP y Unzip
Anser, many thanks
you are right; hb_unzipfile only unpack it, if all the parameters are present
Regards
you are right; hb_unzipfile only unpack it, if all the parameters are present
Regards
Resistencia - "Ciudad de las Esculturas"
Chaco - Argentina
Chaco - Argentina