FileListToArray recursive with max depth

[michaelslamet]

Hi M23,

Can use show me example code using this UDF? I would like to search folder ABC from $source_folder. If found then copy entire folder to $dest_folder. If not found that find any files which name contain string ABC in it and copy to $dest_folder

Thanks for your help and your time

Answering my own question: searching through this forum I found a example code for _RecFileListToArray. Let me try to code it first because asking more questions

[Melba23]

michaelslamet,

Delighted you want to try and code something yourself - I will be here if you run into difficulties.

M23

[michaelslamet]

michaelslamet,

Delighted you want to try and code something yourself - I will be here if you run into difficulties.

M23

Thanks M23

And this is my first difficulties

using _RecFileListToArray I found a folder that match my criteria:

$search_result = _RecFileListToArray(GUICtrlRead($location), "*" & $find_criteria & "*", 2, 1, 0, 2)

I try to copy the result to $dest_folder:

DirCopy($search_result[$counter], @Desktopdir & "\", 1)

The problem is DirCopy only copy the content of folder $search_result to $dest_folder, not the folder itself.

example:

search result: folder ABC, which is contain 1.txt and 2.txt

Dircopy will copy the 1.txt and 2.txt to $dest_folder so $dest_folder will content 1.txt and 2.txt

I want $dest_folder contain folder ABC and inside folder ABC there is 1.txt and 2.txt

This is not a _RecFileListToArray problem

And I hope you can understand what i'm trying to say

[Melba23]

michaelslamet,

You just need to correctly specify the destination path that you want.

I assume that $search_result[$counter] looks like this - Path\path\path\ABC. You need to get the ABC part of the total path and then do this:

DirCopy($search_result[$counter], @Desktopdir & "\ABC", 1)

Now the command will create the ABC folder on the desktop and copy over the files within as you wish.

You might find this useful to get the folder name from the path:

$sPath = "Path\path\path\ABC"

$sFolder = StringRegExpReplace($sPath, "^.*\\(.*)", "\1")

ConsoleWrite($sFolder & @CRLF)

All clear?

M23

[michaelslamet]

michaelslamet,

You just need to correctly specify the destination path that you want.

I assume that $search_result[$counter] looks like this - Path\path\path\ABC. You need to get the ABC part of the total path and then do this:

DirCopy($search_result[$counter], @Desktopdir & "\ABC", 1)

Now the command will create the ABC folder on the desktop and copy over the files within as you wish.

You might find this useful to get the folder name from the path:

$sPath = "Path\path\path\ABC"

$sFolder = StringRegExpReplace($sPath, "^.*\\(.*)", "\1")

ConsoleWrite($sFolder & @CRLF)

All clear?

M23

haha, thanks a lot M23

Works great now this is the modified code, your StringRegExp to get the folder name is so great!

$search_result = _RecFileListToArray(GUICtrlRead($location), "*" & $find_criteria & "*", 2, 1, 0, 2)
For $counter = 1 to $search_result[0]
  $folder_name_only = StringRegExpReplace($search_result[$counter], "^.*\\(.*)", "\1") 
  DirCopy($search_result[$counter], @Desktopdir & "\" & @desktopdir & "\" & $folder_name_only, 1)
Next

[michaelslamet]

michaelslamet,

You just need to correctly specify the destination path that you want.

I assume that $search_result[$counter] looks like this - Path\path\path\ABC. You need to get the ABC part of the total path and then do this:

DirCopy($search_result[$counter], @Desktopdir & "\ABC", 1)

Now the command will create the ABC folder on the desktop and copy over the files within as you wish.

You might find this useful to get the folder name from the path:

$sPath = "Path\path\path\ABC"

$sFolder = StringRegExpReplace($sPath, "^.*\\(.*)", "\1")

ConsoleWrite($sFolder & @CRLF)

All clear?

M23

Hi M23, question again

The search result, can we know which one is file and which one is folder, if we choose to get both files and folder?

[Melba23]

michaelslamet,

Read the function header:

$sPath - Initial path used to generate filelist. If path ends in \ then folders will be returned with an ending \

Then a simple StringRight($var, 1) will let you know.

M23

P.S. When you reply please use the "Add Reply" button at the top and bottom of the page rather then the "Reply" button in the post itself. That way you do not get the contents of the previous post quoted in your reply and the whole thread becomes easier to read.

[michaelslamet]

Aha, my mistake not reading it carefully

And this reply is from "add reply" at the beginning page

Thanks, M23!!

[Melba23]

michaelslamet,

Delighted I could help.

M23