posts - 41,  comments - 40,  trackbacks - 0

::修改
SET old=.TXT
SET new=%old%%COMPUTERNAME%


::还原
::SET new=.TXT
::SET old=%old%%COMPUTERNAME%


::文件列表
SET list=%old%.VAB


::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::
:: 1、先把当前目录及子目录下所有%old%后缀名的文件列出来。
::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
DIR /A-D /B /L /N /ON /S *%old%>%list%


::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::
:: 2、再根据列出来的记录修改文件名。
::
:: FOR命令加上"delims=|",表示文件夹名称变量用“|”分隔。因为默认是空格和制表符,一旦遇到如“新建文件
::
:: 夹 (2)”这样的文件夹,会断开成为“新建文件夹”,导致找不到文件夹。又因为“|”不能用于文件夹名,所以使
::
:: 用“|”作为分隔符。
::
:: 可以用 %%~ 将文件名分离成文件名、扩展名、盘符等部分,%%~na表示只有文件名,%%~xa表示只有后缀名
::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
IF EXIST %list% FOR /F "delims=|" %%a IN ( %list% ) DO IF EXIST "%%a" REN "%%a" "%%~na%new%"


::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
::
:: 3、删除用过的列表。
::
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
IF EXIST %list% ATTRIB /D /S -S -H -A -R %list% && DEL /F /Q %list%


PAUSE


 

				
				
		

posted on 2007-04-10 03:29 NeedJava 阅读(6478) 评论(0)  编辑  收藏 所属分类: DOS Windows

只有注册用户登录后才能发表评论。


网站导航: