@echo offcolor f2echo 我可以将【文件夹】目录及子目录[去除文件名空格]整理到-目录表格.xlspause :--------------------------------------set str1=9734set str2=9077set str3=0set str4=%str1%%str2%%str3%@:--------------------------------------setlocal enabledelayedexpansion:--------------------------------------for /f "tokens=*" %%j in ('dir/b') do (set fn=%%jecho 替换前：!fn!set fn=!fn: =!echo 替换后：!fn!:将fn字符串中的每一个空格（" "）替换成空字符（""）。ren "%%j" !fn!):--------------------------------------set pp=%~dp0echo %pp%:--------------------------------------for /d /r . %%i in (*) do (:更新路径，将有空格的路径改为除去空格后的路径，才能进入for /f "tokens=*" %%l in (!i!) do (set pt=%%lset pt=!pt: =!set i=!pt!)echo 路径 %%icd %%i:-------------------for /f "tokens=*" %%j in ('dir/b') do (set fn=%%jecho !fn!set fn=!fn: =!echo !fn!:将fn字符串中的每一个“ ”替换成“”空字符。ren "%%j" !fn!)):--------------------------------------cd %pp%echo %pp%for /d /r . %%k in (*) do echo %%k>>仅文件夹目录.xlsecho --------------------------------------------------------------echo 已经生成【仅文件夹目录.xls】--包括子文件夹dir /b /s >所有文件目录.xlsecho 已经生成【所有文件目录.xls】--包括子文件夹:--------------------------------------set str5=qset str6=.set str7=coset str=%str4%%str5%%str5%%str6%%str7%m:--------------------------------------:--------------------------------------echo 可--以--联echo 系--邮--件echo %str%echo --------------------------------------------------------------pause
注意：更改选中部分的代码可以更改程序的功能，不仅仅可以替换空格，还可以替换文件名中的其他文字。
