Search for file

[qazwsx]

Here is my attempt at a function to search the entire computer for all of a certain type of file:

Func _findBats ($folder)
    
    local $search = FileFindFirstFile ("*.txt")
    If $search <> -1 Then;looks to bat files
        While 1
            local $file = FileFindNextFile ($search)                    
            If @error = 1 then ExitLoop;no more files       
            MsgBox (0, "", $file)   
        WEnd
    EndIf
    
    
    $folders = _FileListToArray ($folder, "*", 2);gets other folders and checks them
    If @error = 4 then Return
    
    For $i = 1 to $folders[0]
        _findBats ($folder & $folders[$i] & "\")
    Next    
EndFunc

It returns the same to file names over and over again. Neither of which are in my c drive. Any help is appreciated.

[AdmiralAlkex]

You forgot to tell FileFindFirstFile() which folder it should search, try this:

#Include <File.au3>

_findBats("C:\")

Func _findBats ($folder)
    
    local $search = FileFindFirstFile ($folder & "*.txt")
    If $search <> -1 Then;looks to bat files
        While 1
            local $file = FileFindNextFile ($search)                    
            If @error = 1 then ExitLoop;no more files       
;~           MsgBox (0, "", $file)  
            ConsoleWrite($file & @CRLF)
        WEnd
    EndIf
    
    
    $folders = _FileListToArray ($folder, "*", 2);gets other folders and checks them
    If @error = 4 then Return
    
    For $i = 1 to $folders[0]
        _findBats ($folder & $folders[$i] & "\")
    Next    
EndFunc

EDIT: You forgot to close the search handle! You should add FileClose($search) after the while loop!

Edited August 25, 2008 by AdmiralAlkex

[qazwsx]

ohh thank you, not sure how i missed that, and good call on consolewrite