Ok.  Think I've got it.  3 fixes:

1) I added FULLPATH to the parms:

llRetVal = loCompression.ZipFile(FULLPATH(lcFileToZip),FULLPATH(lcZipFile),'pwd123')

2) I prefaced the couple of solo IsDirectory references with This. as they're class method calls.

3) Also took out an errant ) that didn't seem to throw a compile error on this: RELEASE tcTargetZip)


ZipFolder compressed it to about 20% of the original size. Going to implement this now for 2 projects I'm working on: 1) to zip the source in the AfterBuild project hook event so I have a copy of everything inside the built EXE, and 2) copying data to a backup folder and zipping up the backup folder (encrypted, rather than keeping all the source DBFs and parts).

Thanks all!
--Mike



On 2015-12-27 17:03, [email protected] wrote:
On 2015-12-27 16:55, [email protected] wrote:
Kevin -- here was the fix:

lnNewFileSize = loCompression.FileSize(lcFileToZip) && mjb 12-27-15
was lcZipFile which caused error

Line 19 I believe.

Cheers,
--Mike



Disregard that fix.  I'm wrong, because that line is 4 rows above
that.  So Vince -- it's not working for me for some reason.  Still
debugging but if you find something I'm missing, I'd sure appreciate
it.

Thanks!
--Mike


[excessive quoting removed by server]

_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message: 
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the 
author, and do not constitute legal or medical advice. This statement is added 
to the messages for those lawyers who are too stupid to see the obvious.

Reply via email to