>>First, using "*. " will include only those directories without a file extension. What you need to do is twofold. First, pass and empty string to the function as the file skeleton. This will return only sub-directories if "D" is passed as the parameter for the attributes. Second, passing any file skeleton will result in the function returning all files that match the skeleton because the attributes parameter is inclusive rather than exclusive.
>
>Actually, 'D" allows the inclusion oif subdirs, but does not limit the entries to subfolders. Any approach is going to require recursion through the folder structure either using ADIR or the Scripting.FileSystemObject or any of a dozen other mechanisms. Dave Frankenbach and I dealt with the issue a few months back...

However, if an empty string is passed as the file skeleton along with the "D" attribute only sub-directories (and the current directory's entry and parent) are returned. The problem is that specifying a path isn't passing an empty string which causes all files to be returned.