@echo off ::--------------------------------------------------------------------------------------------------------用户参数赋值---------------------- ::是否删除原有任务(注意：如果设为Y后，会删除系统的所有计划任务，请谨慎设定)set pDelFlag=N::请设定关机延迟小时数set pDefHour=1::请设定关机延迟分钟数set pDefMinute=0 ::--------------------------------------------------------------------------------------------------------系统参数赋值---------------------- set xpProgName=文件批量改名程序set xpFileName=ChgName.batset xpAuthor=Taoetherset xpProgVer=1.0.0.1set xpSupport=http://www.taoyoyo.net/ttt/post/458.htmlset xpEmail=taoether@gmail.comset xpMode=Aset xpDebug_Flag=0::设置颜色方案::xpColorDef--程序默认颜色配置 3e::xpColorErr--程序错误时颜色配置 84, e4::xpColorOth-- 其它颜色，比如帮助，版本信息 3f::xpColor1，xpColor2--各程序自定义颜色::默认方案--------3e,84,3fset xpColorDef=30set xpColorErr=84set xpColorOth=3fset xpColor1=30set xpColor2=f4goto lblInitialize ::--------------------------------------------------------------------------------------------------------程序说明-------------------------::此段为注释：::批量改名程序，可以批量将文件名修改为文件日期+文件名::需要加参数：1，文件；2，源目录；3，目标目录；4，是否带原文件名；5，指定文件名 ::不能在同一目录操作，有可能会重复修改…… ::如：ChgName *.jpg D:\MyTemp\PHOTO d:\photo --将D:\MyTemp\PHOTO下*.jpg修改名字，保存到d:\photo\*.jpg ::--------------------------------------------------------------------------------------------------------系统初始化-------------------------:lblInitialize goto lblStart ::--------------------------------------------------------------------------------------------------------环境设定子程序--------------------:prSetDisplay ::cls color %1 ::mode con lines=%2 cols=%3 title 欢迎使用 %xpProgName%/%xpFileName%_V%xpProgVer% [By %xpAuthor%] echo. echo 【欢迎使用 %xpProgName%/%xpFileName%_V%xpProgVer% By %xpAuthor%】 Rem echo 欢迎使用!xpAuthor!编制的!xpProgName!(!xpFileName!) !xpProgName!_V!xpProgVer! echo. ::echo 当前程序运行模式=[%xpMode%]goto :eof ::--------------------------------------------------------------------------------------------------------程序判断-------------------------:lblStart if /I "%1"=="Version" goto lblVer if /I "%1"=="Ver" goto lblVer if /I "%1"=="V" goto lblVer if /I {%1}=={Help} goto lblhelp if /I "%1"=="H" goto lblhelp if /I {%1}=={H} goto lblhelp if /I {%1}=={?} goto lblhelp if {%1}=={} goto lblError if {%2}=={} goto lblError if {%3}=={} goto lblError if {%2}=={%3} goto lblError if not exist %2 goto lblError goto lblMain ::--------------------------------------------------------------------------------------------------------帮助-------------------------:lblhelp Call :prSetDisplay %xpColorOth% 45 76 echo. echo Help: echo ----------------------------------------- echo 此程序可以批量修改文件名，默认将文件名修改为[文件日期时间+序号]；也可以指定文件名，文件名修改为[指定文件名+序号]；同时，也可保留原文件名。 ::批量改名程序，可以批量将文件名修改为文件日期+文件名 ::需要加参数：1，文件；2，源目录；3，目标目录；4，是否带原文件名【】〖〗 echo. echo 【用法】 %xpFileName% [参数1：文件] [参数2：源目录] [参数3：目标目录] [参数4：是否保留原文件名] [参数5：指定文件名] echo. echo 【说明】 echo 参数1：要修改名称的文件，支持通配符，如*.jpg、10*.jpg echo 参数2：源目录--要改名文件的所在目录 echo 参数3：目标目录--改名后文件存放的目录，如果没有此目录，程序会自动创建目录 echo 参数4：是否保留原文件名--非必要参数：设置此参数=Y时，保留原文件名(此时命名中不加序号)；此参数=N时，不保留原文件名，此时命名中会添加序号。 echo 参数5：设置特定文件名--非必要参数：设置此参数时，以[参数5+序号/原文件名]命名；不设置时，以[文件的日期时间+序号/原文件名]命名。 echo. echo 【注意】 echo 1，参数1~3为必填参数，不能为空! echo 2, 目录最后必须带斜杠"\" echo 3，源目录和目标目录不能为同一目录 echo 4, 目标目录如果不存在时，程序会自动创建目录 echo. echo 【此外】 echo 参数1=Version，显示程序版本 (Version=Ver=V) echo 参数1=Help，显示程序帮助 (Help=H=?) echo. echo 【示例】 echo %xpFileName% *.jpg d:\photo\ d:\new\ echo 处理文件夹d:\photo\中的*.jpg文件，复制到目录d:\new\中，不保留原文件名，按[文件的日期时间+序号]命名。 echo %xpFileName% *.jpg d:\photo\ d:\new\ Y echo 处理文件夹d:\photo\中的*.jpg文件，复制到目录d:\new\中，保留原文件名，按[文件的日期时间+原文件名]命名。 echo %xpFileName% 10*.jpg d:\photo\ d:\new\ N 20100910 echo 处理文件夹d:\photo\中的10*.jpg文件，复制到目录d:\new\中，不保留原文件名，按[20100910+序号]命名。 echo %xpFileName% 10*.jpg d:\photo\ d:\new\ Y 20100910 echo 处理文件夹d:\photo\中的10*.jpg文件，复制到目录d:\new\中，保留原文件名，按[20100910+原文件名]命名。 echo. echo 【相关说明】 %xpSupport% echo 【技术支持】 %xpEmail% echo ----------------------------------------- call :lblAdgoto lblEnd ::--------------------------------------------------------------------------------------------------------版本-------------------------:lblVer Call :prSetDisplay %xpColorOth% 45 76 echo. rem 重要声明： rem 本程序由陶永利编写，您可以任意传播，但请不要删除以下信息! rem 如用于商业用途，请与作者联系。 echo Version: echo ------------------------------ echo Program: %xpProgName% / %xpFileName% echo Author: %xpAuthor% echo Version: %xpProgVer% echo IssueTime: 20100526 echo UpdateTime: echo Email: %xpEmail% echo Blog: http://www.taoyoyo.net/ttt/ echo HomePage: http://www.taoyoyo.net/ echo ------------------------------ echo. echo Version Log: echo ----------------------------------------- echo Ver. Date. Log. echo ----------------------------------------- echo V1000 20100526 New program issue. echo V1001 20101010 Optimize program echo. echo ... echo ----------------------------------------- echo 相关说明：%xpSupport% echo 技术支持：%xpEmail% Call :lblAdgoto lblEnd ::--------------------------------------------------------------------------------------------------------错误处理-------------------------:lblError Call :prSetDisplay %xpColorErr% 15 76 echo. ::echo 【相关说明】 %xpSupport% ::echo 【技术支持】 %xpEmail% ::echo --相关说明: %xpSupport% 技术支持: %xpEmail% ::echo --相关说明: %xpSupport% 技术支持: %xpEmail% echo 【程序错误】 echo. if {%1}=={} ( echo 参数不足! echo. echo 此命令需要三个必选参数： echo [参数1：文件] echo [参数2：源目录] echo [参数3：目标目录] echo 还有一个选填参数： echo [参数4：是否保留原文件名] echo [参数5：指定文件名] echo. echo 请键入[%xpFileName% H]查看帮助信息 echo. echo --相关说明: %xpSupport% echo --技术支持: %xpEmail% goto lblEnd ) if {%2}=={} ( echo 参数不足! echo. echo 此命令需要三个必选参数： echo [参数1：文件] echo [参数2：源目录] echo [参数3：目标目录] echo 还有一个选填参数： echo [参数4：是否保留原文件名] echo [参数5：指定文件名] echo. echo 请键入[%xpFileName% H]查看帮助信息 echo. echo --相关说明: %xpSupport% echo --技术支持: %xpEmail% goto lblEnd ) if {%3}=={} ( echo 参数不足! echo. echo 此命令需要三个必选参数： echo [参数1：文件] echo [参数2：源目录] echo [参数3：目标目录] echo 还有一个选填参数： echo [参数4：是否保留原文件名] echo [参数5：指定文件名] echo. echo 请键入[%xpFileName% H]查看帮助信息 echo. echo --相关说明: %xpSupport% echo --技术支持: %xpEmail% goto lblEnd ) if /I {%2}=={%3} ( echo 参数错误! echo. echo 源目录和目标目录相同，这样会导致重复命名，请修改参数。 echo. echo 请键入[%xpFileName% H]查看帮助信息 echo. echo --相关说明: %xpSupport% echo --技术支持: %xpEmail% goto lblEnd ) if not exist %2 ( echo 源目录错误! echo. echo 源目录[%2]不存在，请检查后重新输入。 echo. echo 请键入[%xpFileName% H]查看帮助信息 echo. echo --相关说明: %xpSupport% echo --技术支持: %xpEmail% goto lblEnd ) ) echo. goto lblEnd ::--------------------------------------------------------------------------------------------------------广告-------------------------:lblAd echo. ::echo ---------- echo 【一点广告】 ::echo ---------- echo 本资料由悠悠网, TTT BLOG提供，欢迎访问! echo [悠悠网] http://www.taoyoyo.net/ echo [TTT BLOG] http://www.taoyoyo.net/ttt/ echo 联系我们：taoether@gmail.comgoto :eof ======下面是广告时间~~====== 本资料由悠悠网提供，欢迎访问悠悠网：http://www.taoyoyo.net/ 悠悠网，精心为大家收集整理精品网络资源! 欢迎进入-- [猫腻小说] http://www.taoyoyo.net/maoni/ 专门收集整理猫腻的作品，保证原汁原味，有前后题记，更新时间，全部手工编辑整理，便于阅读和收藏，并开通wap功能(手机阅读)，以及邮件，RSS订 阅功能! [猫腻论坛] http://www.taoyoyo.net/mao/ 这里是猫腻书迷的家，是由猫腻书迷自发组织的论坛，专门讨论猫腻的小说，并收集猫大的各种新闻，作品! [经典小游戏] http://www.taoyoyo.net/mgame/ 收集整理经典的小游戏，绝对经典，不经典不收集，可以下载，可以在线玩，并有游戏说明，攻略，心得! [我的资源] http://www.taoyoyo.net/cpost/res/res_home.ASP 收集整理经典的小说、学习资料、精品软件等。 [TTT BLOG] http://www.taoyoyo.net/ttt/ 我的博客，生活点滴，心得体会，希望与更多的朋友分享!(关注oracle,delphi,java,Linux,unix,以及网站知识!) [YOYO BLOG] http://www.taoyoyo.net/yoyo/ 女儿的博客，记录我的宝贝女儿的生活点滴，瞬间，留下美好的回忆! [悠悠文摘] http://www.taoyoyo.net/lib/ 悠悠周刊网站，精心收集整理精品文摘，并发行免费电子杂志 <悠悠周刊> 联系我们：taoether@gmail.com::--------------------------------------------------------------------------------------------------------临时保存代码------------------------- ::保留原文件名 ::copy %%i %3!pFNewName!_%%~nxi ::不保留原文件名 ::copy %%i %3!pFNewName!%%~xifor /r %2 %%i in (%1) do ( set pFTime=%%~ti set pFNewName=!pFTime:~0,4!!pFTime:~5,2!!pFTime:~8,2!_!pFTime:~11,2!!pFTime:~14,2! set /a pNo=!pNo!+1 if /I "%4"=="Y" ( copy %%i %3!pFNewName!_%%~nxi echo !pNo! %%~nxi - %%~ti 更名为 !pFNewName!_%%~nxi ) if /I not "%4"=="Y" ( copy %%i %3!pFNewName!_!pNo!%%~xi echo !pNo! %%~nxi - %%~ti 更名为 !pFNewName!_!pNo!%%~xi ) ) ::--------------------------------------------------------------------------------------------------------主程序-------------------------:lblMain Call :prSetDisplay %xpColorDef% @echo offsetlocal enabledelayedexpansionecho.::echo 参数：%1 ，%2 ，%3 , %4echo 将目录[%2]中的文件%1，复制到目录[%3]中，并修改文件名……echo.echo ---处理如下---echo.::如果目标目录不存在时，创建if not exist %3 ( echo 目标目录[%3]不存在，正在创建…… md %3 echo --目标目录创建成功! echo.) set pNo=0for /r %2 %%i in (%1) do ( set pFTime=%%~ti if /I {%5}=={} ( ::以文件的日期时间命名 set pFNewName=!pFTime:~0,4!!pFTime:~5,2!!pFTime:~8,2!_!pFTime:~11,2!!pFTime:~14,2! ) else ( ::以任意名称命名 set pFNewName=%5 ) set /a pNo=!pNo!+1 if /I "%4"=="Y" ( copy %%i %3!pFNewName!_%%~nxi echo !pNo! %%~nxi - %%~ti 更名为 !pFNewName!_%%~nxi ) else ( copy %%i %3!pFNewName!_!pNo!%%~xi echo !pNo! %%~nxi - %%~ti 更名为 !pFNewName!_!pNo!%%~xi ) ) goto lblEnd ::--------------------------------------------------------------------------------------------------------程序结束------------------------- :lblEndecho.pause
调试再调试，不完美不罢休……太浪费时间了! 终于完成了，自认为功能很强大，而且很完美了~~想到的功能都加上了，想到的错误也都排除了…… 虽然是为了修改相片作的，但绝对适用于修改任何文件……欢迎使用，欢迎指正! 主要功能介绍： 此程序会批量命名指定文件夹中的指定文件(文件支持通配符)，执行时会将文件复制到指定目录下进行修改名称。 1，默认情况下，重命名为：[文件日期时间+序号] 2，也可以保留原文件名，这时不带序号：[文件日期时间+原文件名] 3，也可指定文件名，此时文件重命名为：[指定文件名+序号]或[指定文件名+原文件名] 4，以上情况用5个参数控制，使用起来还算方便。 5，加入帮助功能，而且一改再改，为的是让别人上手就能明白，充分使用此程序。 6，加入排错功能，一般错误都有提示。 下载地址：http://down.qiannao.com/space/file/taoether/-4e0a-4f20-5206-4eab/-8f6f-4ef6-5de5-5177/ChgName.rar/.page=================== 程序帮助=================== 【欢迎使用 文件批量改名程序/ChgName.bat_V1.0.0.1 By Taoether】Help:----------------------------------------- 此程序可以批量修改文件名，默认将文件名修改为[文件日期时间+序号]；也可以指定文件名，文件名修改为[指定文件名+序号]；同时，也可保留原文件名。 【用法】 ChgName.bat [参数1：文件] [参数2：源目录] [参数3：目标目录] [参数4：是否保留原文件名] [参数5：指定文件名] 【说明】 参数1：要修改名称的文件，支持通配符，如*.jpg、10*.jpg 参数2：源目录--要改名文件的所在目录 参数3：目标目录--改名后文件存放的目录，如果没有此目录，程序会自动创建目录 参数4：是否保留原文件名--非必要参数：设置此参数=Y时，保留原文件名(此时命名中不加序号)；此参数=N时，不保留原文件名，此时命名中会添加序号。 参数5：设置特定文件名--非必要参数：设置此参数时，以[参数5+序号/原文件名]命名；不设置时，以[文件的日期时间+序号/原文件名]命名。 【注意】 1，参数1~3为必填参数，不能为空! 2, 目录最后必须带斜杠"\" 3，源目录和目标目录不能为同一目录 4, 目标目录如果不存在时，程序会自动创建目录 【此外】 参数1=Version，显示程序版本 (Version=Ver=V) 参数1=Help，显示程序帮助 (Help=H=?) 【示例】 ChgName.bat *.jpg d:\photo\ d:\new\ 处理文件夹d:\photo\中的*.jpg文件，复制到目录d:\new\中，不保留原文件名，按[文件的日期时间+序号]命名。 ChgName.bat *.jpg d:\photo\ d:\new\ Y 处理文件夹d:\photo\中的*.jpg文件，复制到目录d:\new\中，保留原文件名，按[文件的日期时间+原文件名]命名。 ChgName.bat 10*.jpg d:\photo\ d:\new\ N 20100910 处理文件夹d:\photo\中的10*.jpg文件，复制到目录d:\new\中，不保留原文件名，按[20100910+序号]命名。 ChgName.bat 10*.jpg d:\photo\ d:\new\ Y 20100910 处理文件夹d:\photo\中的10*.jpg文件，复制到目录d:\new\中，保留原文件名，按[20100910+原文件名]命名。 【相关说明】 http://www.taoyoyo.net/ttt/post/458.html 【技术支持】 taoether@gmail.com-----------------------------------------本资料由悠悠网提供，欢迎访问悠悠网：http://www.taoyoyo.net/ 悠悠网，精心为大家收集整理精品网络资源! 欢迎进入-- [TTT BLOG] http://www.taoyoyo.net/ttt/ 我的博客，生活点滴，心得体会，希望与更多的朋友分享!(关注oracle,delphi,java,Linux,unix,以及网站知识!) [YOYO BLOG] http://www.taoyoyo.net/yoyo/ 女儿的博客，记录我的宝贝女儿的生活点滴，瞬间，留下美好的回忆! [悠悠文摘] http://www.taoyoyo.net/lib/ 悠悠周刊网站，精心收集整理精品文摘，并发行免费电子杂志 <悠悠周刊> [猫腻小说] http://www.taoyoyo.net/maoni/ 专门收集整理猫腻的作品，保证原汁原味，有前后题记，更新时间，全部手工编辑整理，便于阅读和收藏，并开通wap功能(手机阅读)，以及邮件，RSS订阅功能! [猫腻论坛] http://www.taoyoyo.net/mao/ 这里是猫腻书迷的家，是由猫腻书迷自发组织的论坛，专门讨论猫腻的小说，并收集猫大的各种新闻，作品! [我的资源] http://www.taoyoyo.net/cpost/res/res_home.ASP 收集精典的学习资料，视频，游戏，小说等资料 联系我们：taoether@gmail.com