Suchfunktion - bestimmte Dateien in allen Ordnern suchen

[autoit]

#cs ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

AutoIt Version: 3.2.8.1
Author: WeaponX

[/autoit] [autoit][/autoit] [autoit]

Script Function:
Recursive file search (string based)

[/autoit] [autoit][/autoit] [autoit]

Notes:
-Fastest thus far

[/autoit] [autoit][/autoit] [autoit]

#ce ----------------------------------------------------------------------------

[/autoit] [autoit][/autoit] [autoit]

#include <array.au3>
$timestamp = TimerInit()
$Array = RecursiveFileSearch ("D:\temp")
MsgBox(0, "", (TimerDiff($timestamp) / 1000) & " seconds");0.0902s / 2090 files
_ArrayDisplay($Array)

[/autoit] [autoit][/autoit] [autoit]

Func RecursiveFileSearch ($startDir, $depth = 0)

[/autoit] [autoit][/autoit] [autoit]

If $depth = 0 Then Global $RFSstring = ""

[/autoit] [autoit][/autoit] [autoit]

$search = FileFindFirstFile($startDir & "\*.*")
If @error Then Return

[/autoit] [autoit][/autoit] [autoit]

;Search through all files and folders in directory
While 1
$next = FileFindNextFile($search)
If @error Then ExitLoop

[/autoit] [autoit][/autoit] [autoit]

;If folder, recurse
If StringInStr(FileGetAttrib($startDir & "\" & $next), "D") Then
RecursiveFileSearch ($startDir & "\" & $next, $depth + 1)
Else
;Append filename to master string
$RFSstring &= $startDir & "\" & $next & "*"
EndIf
WEnd
FileClose($search)

[/autoit] [autoit][/autoit] [autoit]

If $depth = 0 Then Return StringSplit(StringTrimRight($RFSstring, 1), "*")
EndFunc;==>RecursiveFileSearch

[/autoit]