FiveTech Support Forums

Antonio,

Instale la nueva version 8.04 y me da problemas con la libreria Hbzip,
usando las funciones HB_Zipfile() y HB_Unzipfile()
estoy compilando con xHarbour.
Veo que HBZIP.LIB tiene fecha de 2008.04.11 y el resto de las librerias de xHarbour tienen fecha de 2008.04.18.

Detalle del error

Error: Unresolved external 'inflateEnd' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive
Error: Unresolved external '_deflate' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive
Error: Unresolved external '_get_crc_table' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive
Error: Unresolved external '_deflateEnd' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive
Error: Unresolved external '_deflateInit2' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive
Error: Unresolved external 'crc32' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive
Error: Unresolved external '_inflateInit2' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive
Error: Unresolved external '_inflate' referenced from F:\LIB\3DHARBOUR\XFWH\HBZIP.LIB|ziparchive

Olá

também estou com o mesmo problema.

Atualizei para o xHarbour abril/2008 e os erros são os mesmos.
Alguem tem uma solução?

[]'s

Rogerio

Teneis que enlazar la librería zlib.lib:

http://www.hotshare.net/file/51363-294266699c.html

Pessoal

já passei 3 dias nisto e não me funciona o zip, dá um erro GPF e o windows fecha o aplicativo. É criado um arquivo zip com 0 bytes apenas.

O código está assim:

function T510()

LOCAL aZipar := {"WT110.prg","WT170.prg", "WT160.prg","WT130.prg"}
LOCAL cfile := "pacote.zip"

     IF ! HB_ZIPFILE(cfile, aZipar,9,,.t.,,.F.,.F.,)
        msgStop("Criação do arquivo falhou: "+ cfile, "Problemas:" )
        RETURN NIL
     ENDIF

RETURN NIL

no arquivo MAK o libfiles está assim:

LIBFILES = E:\FWH\lib\FiveHX.lib \
E:\FWH\lib\FiveHC.lib \
E:\xHarbour\lib\rtl.lib \
E:\xHarbour\lib\vm.lib \
E:\xHarbour\lib\gtgui.lib \
E:\xHarbour\lib\lang.lib \
E:\xHarbour\lib\macro.lib \
E:\xHarbour\lib\rdd.lib \
E:\xHarbour\lib\dbfntx.lib \
E:\xHarbour\lib\dbfcdx.lib \
E:\XHARBOUR\LIB\HBSIX.LIB \
E:\XHARBOUR\LIB\DBFFPT.LIB \
E:\XHARBOUR\LIB\PCREPOS.LIB \
E:\xHarbour\lib\common.lib \
E:\XHARBOUR\LIB\HBZIP.LIB \
E:\FWH\LIB\ZLIB.LIB \
E:\xHarbour\lib\pp.lib \
E:\BORLAND\bcc55\lib\cw32.lib \
E:\BORLAND\bcc55\lib\import32.lib \
E:\BORLAND\bcc55\lib\PSDK\odbc32.lib

já testei com vários exemplos que encontrei aqui no forum mas não funciona.

[]'s

Rogerio

Stefano

pelo que pude verificar é um erro do xHarbour, portanto hb_zipfile() não funciona com FWH 8.04 e xHarbour.

Existe alguma outra forma de criar e abrir arquivos zip sem o uso de programas externos?

[]'s

Rogerio

Olá Rogério,

Coloca a HPZIP.LIB antes das libs do FWH.

Cara já fiz isso e não funciona:

LIBFILES = E:\XHARBOUR\LIB\HBZIP.LIB \
E:\FWH\LIB\ZLIB.LIB \
E:\FWH\lib\FiveHX.lib \
E:\FWH\lib\FiveHC.lib \
E:\xHarbour\lib\rtl.lib \
E:\xHarbour\lib\vm.lib \
E:\xHarbour\lib\gtgui.lib \
E:\xHarbour\lib\lang.lib \
E:\xHarbour\lib\macro.lib \
E:\xHarbour\lib\rdd.lib \
E:\xHarbour\lib\dbfntx.lib \
E:\xHarbour\lib\dbfcdx.lib \
E:\XHARBOUR\LIB\HBSIX.LIB \
E:\XHARBOUR\LIB\DBFFPT.LIB \
E:\XHARBOUR\LIB\PCREPOS.LIB \
E:\xHarbour\lib\common.lib \
E:\xHarbour\lib\pp.lib \
E:\BORLAND\bcc55\lib\cw32.lib \
E:\BORLAND\bcc55\lib\import32.lib \
E:\BORLAND\bcc55\lib\PSDK\odbc32.lib

Esse problema está atravancando o desenvolvimento de uma nova versão do sistema.

Preciso gerar um arquivo zip para envia-lo por e-mail ou FTP a uma máquina central. E essa máquina tem que abrir o zip, atualizar o BD e mandar um zip de volta.

[]'s

Rogerio

Rogerio

fwh 8.04 and xharbour May 2008

It is OK

ATTENTION

zipfile () if ok return .T.
zipunfile () if ok return .F. (?)

Stefano

Ok Stefano

agora sim, perfeito!

o bug estava nas libs do xHarbour.

[]'s

Rogerio