[решено] Получить список каталогов в каталоге

Помогите.
Есть некая директория например C:\ScriptDir\dir\
соответственно ScriptDir директория со скриптом
В dir расположено например 10-ть каталогов, а в них также есть куча файлов и каталогов.
как мне получить все имена каталогов расположенных в C:\ScriptDir\dir\ но не глубже.
К примеру в CMD это выглядело так

Код:

For /D %%i In (*) do Echo %%i >> dirs.txt

Можно использовать следующее

Код:

        $find = FileFindFirstFile ("C:\WSNMP\www\")

        While 1

                $file = FileFindNextFile($find) 

                If @error Then ExitLoop

                        MsgBox(0,"",$file)

        WEnd

Но тогда будут попадать в выборку и файлы. А мне требуется только каталоги.