_FileListToArrayEx

[Spiff59]

There are so many versions of recursive FileListToarray() functions floating around that I finally decided to pull one out of your huge thread from 2009 and post it all alone so someone could find it without first reading 15 pages of discussion. I just did that, the version contains a great deal of your (and many others) contributions, I hope you don't mind I labeled the authorship as: "Half of the Autoit community".

This version doesn't handle complex wildcards correctly. Try the parameters used in the example in the Recursive _FileListToArray() thread I just started, they don't work here. Edited April 6, 2012 by Spiff59

[DXRW4E]

????? concrete example of what has not worked for you?

[Spiff59]

The following returns 0 hits:

$b1 = _FileListToArrayEx(@WindowsDir, "s*.???.*", 4)

[DXRW4E]

What are the "???" ? (What do you look for them?, It does not need to use "???"), windows uses them only in case of research in desktopsearch, but defualt ignores them (because those do not serve?), so we too we do not have enabled the search for the "?", the "?" is interpreted in regex mod

http://www.autoitscript.com/autoit3/docs/functions/StringRegExp.htm

"?" = The previous character, set or group may or may not appear. Equivalent to {0, 1}

"*" = Repeat the previous character, set or group 0 or more times. Equivalent to {0,}

not there ever a file name with the name "name?name.xxx" ?, so your $sFilter is not valid

need to use these for example

"s*.?.*" = "sname.name.txt" Or "snamename.txt"

"s*.*.*" = "sname.name.txt" (NOT "snamename.txt")

everything seems OK, everything perfect ?

Ciao.

Edited April 7, 2012 by DXRW4E

[BrewManNH]

From Wikipedia about wildcards in filenames

Files and directories

When specifying file names (or paths) in CP/M, DOS, Microsoft Windows and Unix-like operating systems, the asterisk character ("*") substitutes for any zero or more characters, and the question mark ("?") substitutes for any one character or less but not more than the amount of question marks. For example 123??? will match 1231 or 12313 but not 1239919991.

[DXRW4E]

Hi BrewManNH, thanks for the info, Unfortunately StringRegExp does not interpret correctly "???"

Ciao.

Edited April 7, 2012 by DXRW4E

[Tlem]

Hi DXRW4E, Thank You for your work.

I understand your point of view about the number of flag, but if you want to keep the AutoIt philosophy, the recurse parameter should be a specific flag (like DirRemove, FileSetAttrib, FileSetTime or other). And so, the path return should be an other parameter.

Like I said and after reflexion, the default return should be path relative and this parameter might be omitted because full path can be obtained by adding $sPath in front of the result. ^^

So, if you are agree, the function should be :

_FileListToArrayEx($sPath[, $sFilter = "*"[, $iFlag = 0 [, $recurse = 0 ]]])

Moreover, I find that the _FileListToArrayEx name should be reserved for more complex functions. But I am in no way persuaded by the will to update the "official" function. ^^

[DXRW4E]

Hi Tlem, Thank You for all suggestions

I understand you very well, that was just my personal opinion, I really like the BITAND, using the BITAND can add it to function even more 10 flags, without changing the structure of the function ect ect, to give an example such as FileOpen, to me personally it looks much more professional the use of BITAND

Thanks Again

and sorry again for my English

Ciao.

Edited April 12, 2012 by DXRW4E

[Tlem]

Whell, make like you want !

Now it will be more interesting to resolve what Spiff59 said about the mask of search.

It work on _FileListToArray (and probably to Spiff59 function), so in this time, his function is more universal and complete than your's.

You should stop to said "sorry for my English". We know that you'r not English.

I'm not English too and my translation is very often rough. The main part, it is to be understood.

[DXRW4E]

Updated, Added $sFilter Case-sensitivity flag & Disable the return the count in the first element, for more see the first post

Ciao.

[DXRW4E]

Updated, add $iFlag = 128 Return Backslash at the beginning of the file name, example Return "Filename1.xxx" and the $iFlag = 64 now you can use the $sFilter in RegExp Mod (See Pattern Parameters in StringRegExp )

The following returns 0 hits:

$b1 = _FileListToArrayEx(@WindowsDir, "s*.???.*", 4)

use $iFlag 64 and $sFilter = "[123]+.txt" to find files 1231.txt or 12313.txt 1111111.txt ect ect ("[123]+" = "123???"), see StringRegExp the options are endless them

For example

#include <Array.au3>
#include <_FileListToArrayEx.au3>

Global $a1, $b1
$a1 = TimerInit()
$b1 = _FileListToArrayEx(@WindowsDir, "[123]+.txt", 64)
$a1 = TimerDiff($a1)
_ArrayDisplay($b1, $a1)

now or attached _FileListToArrayEx.au3, because only now noticed that there were parts of the code, the autoit codetag (in the first post of the topic) removed the "=" from the pattern of the regexp ect ect

Ciao.

Edited October 20, 2012 by DXRW4E

[Drakken]

Hi.

First, thank you for your script.

I have a little question about its operation.

Is it normal that I get always an error = 1 when my path is a network path?

Example: _FileListToArrayEx (" Servtemp", "*", 2)

Bye.

Edited January 23, 2013 by Drakken

[DXRW4E]

Hi Drakken, Error = 1 - Path not found

If Not FileExists($sPath) Then Return SetError(1, 1, "")

Are you sure that the path exists?

Ciao.

[Drakken]

Yes the path exists.

I get this error only with network paths.

When I run the original function (_FileListToArray) on the same path I have no errors.

[guinness]

Drakken,

Is that a space I see between and Serv?

[Drakken]

It's just a mistake.

I take another example:

_FileListToArrayEx("ls-sifich10Consulting-TechniqueEnseignes",*.*,2)

Same error.

[DXRW4E]

Yes the path exists.

I get this error only with network paths.

When I run the original function (_FileListToArray) on the same path I have no errors.

No normal ???

Func _FileListToArray($sPath, $sFilter = "*", $iFlag = 0)
Local $hSearch, $sFile, $sFileList, $sDelim = "|"
$sPath = StringRegExpReplace($sPath, "[\\/]+\z", "") & "\" ; ensure single trailing backslash
If Not FileExists($sPath) Then Return SetError(1, 1, "")
ect ect ect

Func _FileListToArrayEx($sPath, $sFilter = "*", $iFlag = 0)
$sPath = StringRegExpReplace($sPath & "\", "[\\/]+", "\\")
If Not FileExists($sPath) Then Return SetError(1, 1, "")
ect ect ect

maybe that's the problem ("[/]+"), here I see now, hmmmm I forgot the network paths

thanks for reporting

Ciao.

Edited January 23, 2013 by DXRW4E

[DXRW4E]

first post already updated, now will have to be ok?

Edited January 23, 2013 by DXRW4E

[Drakken]

Everything is ok now.

Thank you again.

[Neutro]

Thank you very much for this function, it's fast and so easy to use!