Jump to content

Recommended Posts

Posted

Hi all,

I want to get a directory name and all sub directories under it.

example :

c:\users contain 3 subdirectories, and i want a txt file with the subdirectories names and sizes.

Sorry for my english.

Posted

$search = FileFindFirstFile("C:\users\*")  

; Check if the search was successful
If $search = -1 Then
    MsgBox(0, "Error", "No files/directories matched the search pattern")
    Exit
EndIf

While 1
    $file = FileFindNextFile($search) 
    If @error Then ExitLoop
    If StringInStr(FileGetAttrib($file), "D")
        MsgBox(4096, "Directory:", $file)
    Endif
WEnd

; Close the search handle
FileClose($search)

Who else would I be?

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    • No registered users viewing this page.
×
×
  • Create New...