Get list of folders

[devrandom]

Hello!

I use this code to get the list of files in a directory:

FileChangeDir(@DesktopDir)

$first = FileFindFirstFile("*")

$next = FileFindNextFile($first)

$allfiles = ""

While $next <> ""
    $allfiles &= $next & " "
    $next = FileFindNextFile($first)
WEnd

MsgBox(0, "Files:", $allfiles)

But how can I get the list of folders?

[Melba23]

devrandom,

Just use the _FileListToArray function - it finds files and/or folders and you do not have to write all that code.

If you want a recursive version that looks in subfolders as well then look at RecFileListToArray in my sig.

M23

[devrandom]

thank you

EDIT: I noticed that my function finds folders too :S I'm sorry...

Edited March 6, 2011 by devrandom

[Melba23]

devrandom,

But did you notice how to distinguish between files and folders?

From the Help file: "@extended set to 1 if filename is a directory"

M23