[AccessD] Handle Zip and Cabinet folders (files)

John Bodin jbodin at sbor.com
Fri Nov 10 06:16:31 CST 2017

Gustav, I happened upon Ron DeBruin's zip code several weeks ago and utilized it in an app last week.  It worked well for me, but when I gave it to the user that really needed the feature, it failed.  Turned out that she needed to have "Hide extensions for known file types" unchecked in Folder Options on her Windows 7 machine (Windows Explorer/Organize/Folder and Search Options/View.)  When she didn't have that setting unchecked, if looking to extract all *.XLS files out of the zip, it would only see the file name w/o extension and skip over all XLS files.  I could single step through the code and see the file name did not contain the extension.  Unchecking this then allowed the extension to be part of the file name.

I only looked at your well documented code briefly, but do you know if this is something you have to worry about?



-----Original Message-----
From: AccessD [mailto:accessd-bounces at databaseadvisors.com] On Behalf Of Gustav Brock
Sent: Friday, November 10, 2017 3:38 AM
To: Access Developers discussion and problem solving
Subject: Re: [AccessD] Handle Zip and Cabinet folders (files)

Hi Bill

There are many variations on this - also here where Stuart once posted an example - and the core code is often the same with some variations.

The functions you refer to seem to serve specific purposes, some with user interaction, while the goal for mine was to have a pair of very generic functions you can use everywhere and which will free you from the "plumbing" - checking/creating files and folders, good error handling, and returning meaningful result code.
Also, the action of the functions is very similar to that of Windows Explorer when you operate it manually, for example by creating versioned zip folders (zipfolder.zip, zipfolder (2).zip, zipfolder (3).zip, etc.) if you chose not to overwrite an existing zip.


-----Oprindelig meddelelse-----
Fra: AccessD [mailto:accessd-bounces at databaseadvisors.com] På vegne af Bill Benson
Sendt: 10. november 2017 02:08
Til: Access Developers discussion and problem solving <accessd at databaseadvisors.com>
Emne: Re: [AccessD] Handle Zip and Cabinet folders (files)

Ron DeBruin also has some pretty good code here <https://www.rondebruin.nl/win/s7/win001.htm> which was contributed to by Tom Ogilvy and KeepItCool, that I have used in many projects. I don't have time now to see whether your methods differs Gustav, but with Ron's so long published and so oft cited code available through numerous link-to's in many answer forums, something must have caused you to take this on as a test of your own coding prowess! So I hope to find something neat there when I have time to read it this weekend. There is one or two features of Ron's that relies on innate Excel functions but I think they can be replaced with other equivalents.

On Wed, Nov 8, 2017 at 9:11 AM, Gustav Brock <gustav at cactus.dk> wrote:

> Hi all
> Should you wish to zip/unzip or compress/decompress zip or cabinet 
> folders (files), I've put up functions for this at Experts Exchange:
>     Zip and unzip files and folders with VBA the Windows Explorer way
>     https://www.experts-exchange.com/articles/31130/Zip-and-
> unzip-files-and-folders-with-VBA-the-Windows-Explorer-way.html
>     Handle cabinet files and folders with VBA the Windows Explorer way
>     https://www.experts-exchange.com/articles/31144/Handle-
> cabinet-files-and-folders-with-VBA-the-Windows-Explorer-way.html
> Code is also at GitHub: 
> https://github.com/GustavBrock/VBA.Compress.git
> I used the old trick from Stuart to create a zip folder - thanks!
> /gustav

AccessD mailing list
AccessD at databaseadvisors.com
Website: http://www.databaseadvisors.com

More information about the AccessD mailing list