del /s __List.txt for /F "delims=" %%G IN ('dir /b /s') DO @echo "%%G">>"%%~__List.txt" for /r %%a in (__List.txt) do for %%b in ("%%~dpa\.") do ren "%%~a" "%%~nxb%%~xa" pause
filelist1-100.txt 。 它可能会解决'文件已经存在'的错误。
@echo off setlocal if "%~1" == "" goto UseCD rem The start folder is either the current folder on running the batch file rem or the folder specified as first argument on starting the batch file. rem All / (Unix/Mac) in specified folder path are replaced by \ (Windows). rem The folder path must not end with a backslash for this task. set "StartFolder=%~1" set "StartFolder=%StartFolder:/=\%" if "%StartFolder:~-1%" == "\" set "StartFolder=%StartFolder:~0,-1%" if exist "%StartFolder%\" goto CreateLists rem The environment variable CD (Current Directory) holds the entire path rem to the current folder ending not with a backslash, except the current rem folder is the root folder of a drive. :UseCD if not "%CD:~-1%" == "\" ( set "StartFolder=%CD%" ) else ( set "StartFolder=%CD:~0,-1%" ) rem The error log file in start folder existing perhaps from a previous rem run is deleted first before the list file is created recursively in rem each folder of the start folder. :CreateLists set "ErrorLogFile=%StartFolder%\Error.log" %SystemRoot%\System32\attrib.exe -h -r -s "%ErrorLogFile%" >nul del "%ErrorLogFile%" 2>nul call :RecursiveList "%StartFolder%" endlocal rem Avoid an unwanted fall through to the subroutine. goto :EOF rem RecursiveList is a subroutine called for each folder found rem in the start folder and its subfolders. rem For the root folder of a drive like C: the list file name is "DriveC.txt". rem For all other folders the list file name is "Folder Name.txt". rem The command DEL does not delete a file which has hidden, read-only or rem system attribute set. For that reason ATTRIB is called first to remove rem those attributes from a perhaps already existing list file in current rem folder. ATTRIB outputs an error message because of not existing file rem to handle STDOUT which is the reason for >nul which redirects this rem not important error message to device NUL. rem Next the list file is deleted with suppressing the error message output rem by command DIR to handle STDERR with 2>nul if the file does not exist rem at all. But in case of the file really exists and could not be deleted rem (NTFS permissions, file access denied because file is opened in another rem application), an error message is logged into error log file in start rem folder which is hopefully not write-protected, too. rem Creating a list file in a folder is skipped if there is already rem a list file and it could not be deleted by command DEL. rem Otherwise the command DIR is used to write first the names of the rem subfolders in alphabetical order according to name (not alphanumeric) rem into the list file of current folder and next append the names of all rem files in current folder also ordered by name. The name of the list file rem is included in list file. Comment the two lines with command DIR and rem uncomment the 3 lines below to avoid this by first writing the folder rem and files names into a list file in temporary files folder and then rem move this list file with correct list file name to the current folder. rem Last for each subfolder in current folder the subroutine RecursiveList rem calls itself until all subfolders in current folder have been processed. :RecursiveList set "FolderPath=%~1" if "%FolderPath:~2%" == "" ( set "ListFileName=Drive%FolderPath:~0,1%.txt" ) else ( set "ListFileName=%~nx1.txt" ) %SystemRoot%\System32\attrib.exe -h -r -s "%FolderPath%\%ListFileName%" >nul del "%FolderPath%\%ListFileName%" >nul 2>&1 if exist "%FolderPath%\%ListFileName%" ( echo Failed to update: "%FolderPath%\%ListFileName%">>"%ErrorLogFile%" goto ProcessSubFolders ) dir /AD /B /ON "%FolderPath%">"%FolderPath%\%ListFileName%" 2>nul dir /AD /B /ON "%FolderPath%">>"%FolderPath%\%ListFileName%" 2>nul rem dir /AD /B /ON "%FolderPath%">"%TEMP%\%~n0.tmp" 2>nul rem dir /AD /B /ON "%FolderPath%">>"%TEMP%\%~n0.tmp" 2>nul rem move "%TEMP%\%~n0.tmp" "%FolderPath%\%ListFileName%" :ProcessSubFolders for /D %%I in ("%FolderPath%\*") do call :RecursiveList "%%~I" goto :EOF rem The command above exits the subroutine RecursiveList. The batch rem file processing is continued in previous routine which is again rem the subroutine RecursiveList or finally the main batch code above.
Sub-Sub Folder-01 Sub Folder-02-Empty.txt
__filelist.txt some-Data-files_A.xyz some-Data-files_B.xyz some-Data-files_C.xyz Sub-Sub Folder-01.txt