FoxPro/Visual FoxPro - A propósito de Adir

Hola mundo,
Como puedo lstar las carpetas de una unidad o carpeta que elija cuandso el programa esté corriendo?.
Utilizé ADIR(Array,'*.*','D')
Pero solo quiero las carpetas no archivos mas.
Solo quiero carpetas.
Espero su ayuda y graias por todo.

Usa el GETDIR()
Saludos

Por que en vez de *.* pon *.dir pues los directorios tienen extension "dir"

espero entender la pregunta suerte....