How to check if there is .mdb file in a .zip file using VBA?

[weekend00]

Is there a way to check if there is .mdb file in a .zip file using VBA?

what controls do I need to peek inside a .zip file?

[ajetrumpet]

don't zip files act like folders when you click on them? I wonder if you can treat it like a folder, use the mso folderpicker and then list the file extensions in it? Have you tried that already?

[weekend00]

What is mso folderpicker? how to setup it?
my .zip files are showing as regular files, if I click on one of them, winzip window pops up.

[weekend00]

I set the property of .zip to be opened with windows compress folder, seems close to what I want, I am trying in VBA code if i can treat it as a normal folder.

[ajetrumpet]

i beleive the code is:

dim f as object

set f = application.msofolderpicker

[ajetrumpet]

sorry, this is the code:

Application.FileDialog(msoFileDialogFilePicker)

[weekend00]

can not use dir() to look inside a .zip folder.
trying Application.FileDialog(msoFileDialogFilePicker)

[weekend00]

I don`t want to show a dialogbox, I just want to check if there is any .mdb file. if there is, i may need to extract it out.

[Rawb]

It's a bit on the clunky side, but I'd make a Shell Script (or BATCH file) that extracts a list of files inside the Archive and then saves that list to a text file somewhere. Then you can import/parse that file in Access however you want (although, I'd probably do the parsing in the Script/BATCH file myself).

WinZip has a Command Line version that you can use in your Scripts, or you can do a search for Win32 ports of GNU's zip or bzip2.

I know for a fact that any of those three can list files inside a ZIP archive.

[ajetrumpet]

I tried this for you weekend: http://allenbrowne.com/ser-59.html

It doesn't seem to work on zip files. There can't be an extension portion in the name or it fails...

[weekend00]

Thank you for all you help. I may do it manually since it should be a one time work, although there a hundred files.