I tried again as the code below
No errors message, but no action neither
I all want to do is to zip the folder "dados1"



SET LIBRARY TO LOCFILE("vfpcompression.fll")
* ?ZipOpen("C:\MyZipFile.zip")
ZipOpen("test1.zip", "C:\1softwares\1_assist41X\ofi3a\dados1", .F.)
ZipFolder("C:\test2", .F.)
ZipClose()
SET LIBRARY TO