Dirmove - (Moved)

[The-dude]

Hi All,

I'm trying to convert all folders and subfolders names to upper case but I can't get dirmove to rename the subfolders, it only changes the first folder name. Here's my script-

#include <File.au3>

Local $FilePath = "C:\Test\"

$FileList = _FileListToArray($FilePath, '*', 2)

If IsArray($FileList) Then
    For $x = 1 To $FileList[0]
        Dirmove($FilePath & '\' & $FileList[$x], StringUpper($FilePath & '\' & $FileList[$x]), 9)
    Next
EndIf

 

Any and all help would be greatly appreciate. 

[Guest]

Use _FileListToArrayRec with Param $FLTAR_RECUR (1) -> Search in all subfolders (unlimited recursion) instead.

[The-dude]

@Musashi  I don't get any errors using _FileListToArrayRec with but it doesn't do anything either. Maybe it's my code structure, any suggestions? 

 

#include <File.au3>

Local $FilePath = 'C:\Test\'

$FileList = _FileListToArrayRec($FilePath, '*', $FLTAR_RECUR)

If IsArray($FileList) Then
    For $x = 1 To $FileList[0]
        Dirmove($FilePath & '\' & $FileList[$x], StringUpper($FilePath & '\' & $FileList[$x]), 9)
    Next
EndIf

 

[Guest]

35 minutes ago, The-dude said:

any suggestions? 

Example, and be careful with the base directory ! Here I have only set the subdirectories in capital letters.

#include <File.au3>
#include <FileConstants.au3>
#include <Array.au3>

Local $sFilePath = @ScriptDir & "\Dirtest"
Local $aFolderList = _FileListToArrayRec($sFilePath, '*', $FLTA_FOLDERS, $FLTAR_RECUR)
_ArrayDisplay($aFolderList) ; *** just for display

If IsArray($aFolderList) Then
    For $x = 1 To $aFolderList[0]
        ConsoleWrite($x & @CRLF) ; *** just for display
        ConsoleWrite("< :" & $aFolderList[$x] & @CRLF) ; *** just for display
        ConsoleWrite("< :" & StringUpper($aFolderList[$x]) & @CRLF) ; *** just for display
        Dirmove($sFilePath & '\' & $aFolderList[$x], $sFilePath & '\' & StringUpper($aFolderList[$x]), $FC_OVERWRITE)
    Next
EndIf

 

@The-dude

EDIT : In this line you have forgotten a parameter:

$FileList = _FileListToArrayRec($FilePath, '*', $FLTAR_RECUR)

Correct would be :

$FileList = _FileListToArrayRec($FilePath, '*', $FLTA_FOLDERS, $FLTAR_RECUR)

 

Edited January 15, 2020 by Musashi

[The-dude]

@Musashi that worked like a charm - thank you so much! The array display doesn't bother me considering I'll only have to close it once for it to do it's thing.  

[Guest]

13 minutes ago, The-dude said:

@Musashi that worked like a charm - thank you so much! The array display doesn't bother me considering I'll only have to close it once for it to do it's thing.  

You can remove all lines (also the _ArrayDisplay ) containing :

; *** just for display

Edited January 15, 2020 by Musashi

[Melba23]

Moved to the appropriate forum, as the Developer General Discussion forum very clearly states:

Quote

General development and scripting discussions. If it's super geeky and you don't know where to put it - it's probably here.

---

Do not create AutoIt-related topics here, use the AutoIt General Help and Support or AutoIt Technical Discussion forums.

Moderation Team