中财网1992年什么命五行属性:批处理经典：遍历目录及替代文件.bat
来源：百度文库 编辑：中财网 时间：2024/05/09 19:15:15
2006年09月22日 星期五 下午 05:08
遍历目录及替代文件.bat
rem 把目录列表输出到指定文件。。。
dir G:\批目录删除演示\a.txt /s /a /b > dirlist.txt
rem 取出目录列表（把带文件名的目录扩展为只显示目录形式，然后再操作！）
rem 删除当前文件（例如：a.txt，再用其他地方的a.txt文件覆盖当前的a.txt文件。
FOR /F %%I IN (dirlist.txt) DO (cd\ & G: & cd %%~pI & del a.txt & copy G:\a.txt )
rem 可以再次回到原来的目录 cd\ & G: & cd G:\批目录删除演示
rem 可以删除列表文件 dirlist.txt
pause
参考文本：（下面为参考文本，其他的是一些简单批处理的文章）
:: VisitD.bat - 对指定路径指定目录进行遍历的程序
:: 第一参数为要遍历的目录（支持通配符），第二参数为要遍历的路径（缺省为C盘根）
@echo on
:main
if [a.txt]==[] if not exist dirlist.txt goto end
:init
if exist dirlist.txt if exist xset.asd goto loop
set dir=a.txt
set base=G:\批目录删除演示
if [%2]==[] set base=c:
dir G:\批目录删除演示\a.txt /s /a /b > dirlist.txt
echo e 100 ‘set dir=‘ > xset.asd
echo w >> xset.asd
echo q >> xset.asd
:loop
fc dirlist.txt null.txt /n | find "a.txt" > setfile.bat
rem fc dirlist.txt null.txt /n | find "a.txt" > setfile.bat
if errorlevel 1 goto restore
debug setdir.bat nul
call setdir.bat
echo Visiting the dir: %dir%
:: User specified visit code replace this line
find "%dir%" /v dirlist.tx2
copy dirlist.tx2 dirlist.txt > nul
goto loop
:restore
rem if exist dirlist.txt del dirlist.txt
rem if exist xset.asd del xset.asd
rem if exist dirlist.tx2 del dirlist.tx2
rem if exist setdir.bat del setdir.bat
:end
pause