Dir Contents

[Orca 0]

How can I select C:\ and return two arrays

$dirs[0] containing # of entries

$dirs[1-n] containing dir names

$files[0] containing # of entires

$files[1-n] containing file names

I'm trying to build a script that generates a file listing a systems contents in a tree format. If its been done please direct

[buzz44 1]

I guess you could do something with CMD, Run it in a hidden window, type "Dir" and pipe it out to a file? or if you have the latest beta you can use stdout().

[Lazycat 10]

I'm not remember that was exactly solution for dirs, but you can start with this. It's works for files, but can be modified for dirs.

[Orca 0]

CMD is dissabled on the computer I'm interested in running this. The reason for the script is that I'm disallowed from the C:[local] as a user, but autoit can access it just fine. Since I can't normally walk in and view contents I need something that can do it for me.

[buzz44 1]

Same, I made something exactly the same as this, I didnt have access to C:\ Drive. I created a "File Viewer" in VB but I dont know how to emulate this in AutoIt .

[CyberSlug 3]

1) Have you seen the DirGetSize function (notice the flag 1 option)

2) There is also the DOS "tree" command...

Run(@ComSpec & " /c tree C: /F") ;visually verify the command works

Run(@ComSpec & " /c tree C: /F > C:\OutputOfTree.txt") ;redirect to file

[DaleHohm 62]

How can I select C:\ and return two arrays

$dirs[0] containing # of entries

$dirs[1-n] containing dir names

$files[0] containing # of entires

$files[1-n] containing file names

I'm trying to build a script that generates a file listing a systems contents in a tree format. If its been done please direct

<{POST_SNAPBACK}>

I'll leave filling the arrays to you, but here is a sample calling out to the FileSystemObject using the ObjCreate function in the new release available from the Developer forum:

$fso = ObjCreate("Scripting.FileSystemObject");Instantiate FileSystemObject
$rootFolder = "C:\"
$root = $fso.GetFolder($rootFolder) 
$subs = $root.SubFolders; Create SubFolders Collection
ConsoleWrite("There are " & $subs.count & " folders in " & $rootFolder & @CR)
For $fol in $subs; Loop through each subfolder in folder collection
    ConsoleWrite(@TAB & $fol.name & " has " & $fol.files.count & " files" & @CR)
    If $fol.name = "System Volume Information" then ContinueLoop; Special folder, skip
    $files = $fol.Files; Create files collection in subfolders
    For $file in $files; Loop through files in folders
        ConsoleWrite(@TAB & @TAB & $file.name & " (" & $file.size & " bytes)" & @CR)
    Next
Next