Hi, three or four days ago I had download the Harbour 2.1.0beta1 (Rev. 14468) that solve the overwrite problem with the HB_ZipFile. It work fine for me, but today I found that: HB_ZipFile( cFileZip , cFile ) doesn't work anymore.... cFileZip don't exists and (obvious) cFile exists
Little program to test: function main memowrit( "test.txt" , "sample line" ) memowrit( "test2.txt" , "sample line" ) if !file( "test.txt" ) .or. !file( "test2.txt" ) ? "Error creating test files" inkey(0) return .F. endif ferase( "pepe.zip" ) ? "pepe.zip erased" inkey(0) HB_ZIPFILE( "pepe.zip" , "test.txt" ) ? "end first zip, pepe.zip found: " + if( file( "pepe.zip" ) , " .T. " , " .F. " ) inkey(0) ferase( "pepe.zip" ) ? "pepe.zip erased" inkey(0) HB_ZIPFILE( "pepe.zip" , "test.txt" , 8 , NIL , .T. , NIL , .T. , .F. ) ? "First file added, pepe.zip found: " + if( file( "pepe.zip" ) , " .T. " , " .F. " ) inkey(0) HB_ZIPFILE( "pepe.zip" , "test2.txt" , 8 , NIL , .F. , NIL , .T. , .F. ) ? "Finished. Press any key to continue" inkey(0) Return .T. Thanks in advance CdQ -- Saludos/Regards/Abraços CdQ
_______________________________________________ Harbour mailing list (attachment size limit: 40KB) Harbour@harbour-project.org http://lists.harbour-project.org/mailman/listinfo/harbour