Amigos,
assim funciona:
local aFiles:={}
AaDd(aFiles, "bira1\test1.txt")
AaDd(aFiles, "bira1\test2.txt")
AaDd(aFiles, "bira2\test1.txt")
AaDd(aFiles, "bira2\test2.txt")
cFilZip := "C:\FWH1701\SAMPLES\TEST.ZIP"
lOk := HB_ZipFile( cFilZip, aFiles, 9, ,,,.T. )
↧