This is a modified version by Zedna and me to gain a few milliseconds and to return the full path of the files/folders (thanks Zedna). Func _FileListToArray($sPath, $sFilter = "*", $iFlag = 0)
Local $hSearch, $sFile, $sFileList, $asFileList[1]
If Not FileExists($sPath) Then Return SetError(1, 1, "")
If StringRegexp($sFilter, "[\\/:<>|]") Or (Not StringStripWS($sFilter, 8)) Then Return SetError(2, 2, "")
If Not ($iFlag = 0 Or $iFlag = 1 Or $iFlag = 2 Or $iFlag = 4 Or $iFlag = 5 Or $iFl