andreasfc,
Since the enumeration of the DIRs, is my handywork, I'll speak to it. Read or reread my second post (fifth from the top) in this thread. There I try to explain what the code does. It was written to the requirement that PhoeniX put forth. If your requirement is different, the code can be changed.

The line "If ($Name <> ".") And ($Name <> "..") And (GetFileAttr($basedir+"\"+$name) & 16)" skips all parsed lines that dont match the requirements. Namely, it skips the DIR entries "." and ".." and also skips all lines that are not folders.

So, how to change the code depends on what you're trying to achieve. If you simply removed the folder check "(GetFileAttr($basedir+"\"+$name) & 16)", then every file encountered in $basedir would end up as an individual zip.

If, on the other hand, you want to zip the $basedir contents into just one zip file, then you don't even need the DIR enumeration. Just pass $basedir\*.* to the zip routine.

_________________________
Give a man a fish and he will be back for more. Slap him with a fish and he will go away forever.