zip en xHarbour

[horacio]

Quiero comprimir las bases de datos de mi sistema, a modo de backup. Estoy compilando con xHarbour 1.2.1 Rev 9421 y he leido los hilos en el foro cuales son las funciones y librerías para poder comprimir. Una de las funciones es hb_zipfile() y las librerías para la compilación son zlib.lib y hbzip.lib. No tengo hbzip y al invocar la función hb_zipfile me dice que no la encuentra. evidentemente me hace falta otra librería. La pregunta es donde puedo conseguir la librería y si estoy bien orientado ??? Gracias de antemano

Saludos

[surGom]

Horacio la función a utilizar es hb_zipfile

Code: Select all  Expand view

Function CreateZip(aBtns,oDlg )
local z
oMtr:SetRange( 1,  Len( aZip ))
oMtr:setpos(0)

 for z = 1 to len(aZip)
       Hb_ZIPFILE( cname1,aZip[z],9,,,,.F.)
      oMtr:nPosition += 1
      sysrefresh()
next
abtns[3]:Enable()

odlg:update()
Return nil

Luis

[surGom]

Tienes que enlazar zlib.lib y hbzip.lib para xharbour

Disculpa anteriromente se me escapo el submit

Luis

[surGom]

Otra vez... hbzip.lib la tenes en el directorio lib de xharbour

[horacio]

Gracias Luis por contestar, no está esa libreria en el directorio .\lib, por eso pregunte donde podía bajarla. Tienes idea donde ??? Nuevamente muchas gracias.

Saludos

[surGom]

En xharbour\lib siempre vino con esa librería seguramente se te ha borrado bajala de aqui

http://www.4shared.com/file/zV1-hIXY/hbzip.html

Luis

[horacio]

Muchísimas gracias Luis, este fin de semana me dedicaré a terminar esta rutina. Nuevamente agradecido ...

Saludos

[Manuel Aranda]

Mírate este hilo:

viewtopic.php?f=6&t=18371&hilit=pcrepos

[MarioG]

Esto tambíen te será útil:
http://forums.fivetechsupport.com/viewtopic.php?f=6&t=18371&hilit=pcrepos#p96610