Using VFP8.

I am trying to get a list of sub-directories from a passed in directory. The following works fine except when a sub-directory contains a dot in it's name.

***This will capture all directories in c:\test\ EXCEPT for 
***directories named like this:
***c:\test\10.2.0.1\
***c:\test\12.1.3.4\
***etc..

=ADIR(myarray, [C:\test\*.], "D")
DISPLAY MEMORY LIKE myarray

Is there a better way to capture all sub-directories or a way to get every sub-directory in a folder?

Thanks,

Jerry