@echo off ::--------------------------------------------------------------------------------------------------------用户参数赋值---------------------- ::是否删除原有任务(注意:如果设为Y后,会删除系统的所有计划任务,请谨慎设定) set pDelFlag=N ::请设定关机延迟小时数 set pDefHour=1 ::请设定关机延迟分钟数 set pDefMinute=0 ::--------------------------------------------------------------------------------------------------------系统参数赋值---------------------- set xpProgName=文件批量改名程序 set xpFileName=ChgName.bat set xpAuthor=Taoether set xpProgVer=1.0.0.1 set xpSupport=http://www.taoyoyo.net/ttt/post/458.html set [email protected] set xpMode=A set xpDebug_Flag=0 ::设置颜色方案 ::xpColorDef--程序默认颜色配置 3e ::xpColorErr--程序错误时颜色配置 84, e4 ::xpColorOth-- 其它颜色,比如帮助,版本信息 3f ::xpColor1,xpColor2--各程序自定义颜色 ::默认方案--------3e,84,3f set xpColorDef=30 set xpColorErr=84 set xpColorOth=3f set xpColor1=30 set xpColor2=f4 goto 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 :lblAd goto 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 :lblAd goto 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 联系我们:[email protected] goto :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/ 悠悠周刊网站,精心收集整理精品文摘,并发行免费电子杂志<悠悠周刊> 联系我们:[email protected] ::--------------------------------------------------------------------------------------------------------临时保存代码------------------------- ::保留原文件名 ::copy %%i %3!pFNewName!_%%~nxi ::不保留原文件名 ::copy %%i %3!pFNewName!%%~xi for /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 off setlocal enabledelayedexpansion echo. ::echo 参数:%1 ,%2 ,%3 , %4 echo 将目录[%2]中的文件%1,复制到目录[%3]中,并修改文件名…… echo. echo ---处理如下--- echo. ::如果目标目录不存在时,创建 if not exist %3 ( echo 目标目录[%3]不存在,正在创建…… md %3 echo --目标目录创建成功! echo. ) set pNo=0 for /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 ::--------------------------------------------------------------------------------------------------------程序结束------------------------- :lblEnd echo. 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 【技术支持】 [email protected] ----------------------------------------- 本资料由悠悠网提供,欢迎访问悠悠网: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 收集精典的学习资料,视频,游戏,小说等资料 联系我们:[email protected]
时间: 2024-10-21 17:08:53