HB_UNZIPFILE

[rduraes]

Galera, estou com o seguinte problema:
Estou montando uma rotina para compactar e descompactar arquivos utilizando as funções HB_ZIPFILE (compactar) e HB_UNZIPFILE (descompactar) da biblioteca HBZIP.LIB.
Montei uns testes para compactar e funcionou perfeitamente.
Quando tento descompactar não descompacta nem por reza brava.
Alguém conhece e/ou utiliza estas funções.

A sintaxe que estou utilizando é a seguinte:

function main()
local lOk,lOk1
lOk:=hb_zipfile("Teste1.zip","\dms\xhb\fatura\arquivos\*.dbf") // compactar
lOk1:=hb_unzipfile("Teste1.zip",,.t.,'',,"*.dbf") // descompactar (não funciona)

return nil

A versão do xHarbour é 0.99.70

[Toledo]

Amigo, compilei este seu exemplo com o xHarbour 1.1.0 (Simplex) e funcionou certinho. Os arquivos foram compactados e depois descompactados sem problema algum.

Abraços,

[rduraes]

Onde consigo esta versão ?

[Pablo César]

Bem vindo ao fórum !

Acho que para fazer ataulizações do xHarbour é com o próprio TortoiseCVS. Se a sua dúvida está nisto também, veja a indicação do Leonardo neste tópico: https://pctoledo.org/forum/viewtopic.php?t=6007

Encontrei isto utilizando o recurso de "Busca" daqui do fórum.

[sygecom]

Onde consigo esta versão ?

Olá rduraes,
Você pode atulizar seu xharbour para a versão 1.0.0 que se encontra no link abaixo:
http://downloads.sourceforge.net/xharbo ... cc-5-5.exe

E como exemplo, pode usar o exemplo que postei na sessão codigo fonte:
https://pctoledo.org/forum/viewtopic.php?t=6757

Obs: Para usar o exemplo que postei em modo console, basta tirar a parte visual que é usado na Hwgui.

[rduraes]

Com as dicas dadas consegui colocar a função para funcionar.
Agradeço a atenção de todos!
Obrigado. :)Pos