移动和重命名文件，保留扩展名，但在批处理文件中包含子目录

Question

如果这不是问这些问题的地方，请原谅我，我是批处理和脚本的新手，而对于此类帖子则有点新手...

我有一个将接收文件和文件夹的文件夹，我想运行一个脚本，该脚本查看目录并以数字方式重命名每个子文件夹中的所有文件，并在可能的情况下移动它们。

例如，我有一些类似以下内容的内容

Recieved_File_Folder
     |_folder1
     | |_file1.txt
     | |_file2.bmp
     |_folder2
     | |_file4.exe
     | |_file5.bmp
     |__file9.txt
     |__file10.jpg

我希望能够查看每个目录并将其移至类似目录的位置，请记住文件名将是随机的，并且我也希望扩展名保持不变。

Renamed_Folder
    |_folder1
    | |_1.txt
    | |_2.bmp
    |_folder2
    | |_1.exe
    | |_2.bmp
    |__1.txt
    |__2.jpg

我在此上花了很多时间，但做得不太好，非常感谢您的帮助！！ 先感谢您！

Answer 1

这个小脚本应该可以解决问题：

@ECHO OFF

SETLOCAL ENABLEDELAYEDEXPANSION

FOR /F "tokens=1 delims=" %%A IN ('DIR /B /S /A:D') DO (

   SET /A FILE_COUNTER=1

   FOR /F "tokens=1 delims=" %%B IN ('DIR /B /A:-D "%%A"') DO (
      CALL :RENAME "%%A%%B" !FILE_COUNTER!
      SET /A FILE_COUNTER=FILE_COUNTER+1
   )   
)   

ENDLOCAL    
GOTO :EOF    

:RENAME

SET OLD_PATH="%~f1"
SET NEW_FILE_NAME="%2%~x1"
REN %OLD_NAME% %NEW_NAME%    
GOTO :EOF

请谨慎使用，因为脚本不会要求您确认，因此请注意从何处开始！

它是如何工作的：

• 第一个FOR循环递归列出所有子目录，从当前目录开始（使用DIR /B /S /A:D ），并通过变量%%A将完整路径传递到循环主体
• 在第一个循环主体中，变量FILE_COUNTER设置为值1
• 第二个（内部） FOR -loop列出外部循环（使用DIR /B /A:-D "%%A" ）传入的目录中的所有文件，并通过变量%%B将文件的完整路径传递给它的主体%%B
• 在内部循环体内，子例程:RENAME以完整文件名调用当前FILE_COUNTER值作为其参数
• :RENAME子例程使用其参数来形成新文件名，并发出重命名命令REN
• 子例程返回后，当前FILE_COUNTER值加1（ SET /A FILE_COUNTER=FILE_COUNTER+1 ）