[文件操作] 批处理将文件以数字重命名

随风

讨论：将文件以数字重命名
看似简单，其实不然。
现有a.txt文件内容如下，一行一个文件名。路径为当前目录。
要求：
   1、不能改变a.txt内容的顺序
   2、将当前目录下的所有jpg文件以序号的形式重命名 如：从1－16
   3、如果有16个文件，必须重命名为1-16，不允许出现16之后的序号

暂不公布我的代码，各位不防先试试。
a.txt 内容：

2.jpg
1.jpg
a.jpg
5ww.jpg
c.jpg
f.jpg
rty.jpg
3.jpg
11.jpg
b.jpg
6.jpg
e.jpg
8.jpg
111.jpg
7.jpg
30.jpg
复制代码

重新描述一下要求：
当前文件夹有一万多个jpg文件，文件名没有规律，有数字，英文，中文、及中英文混合。
要求：
   将jpg文件以数字形式重命名，必须是从1开始递增，即：最大的一个文件名就是文件的总数。
   要求效率，即：不能先判断文件的总数，再重命名。

[ 本帖最后由 随风 于 2008-6-10 23:55 编辑 ]

随风

是啊，漏了一句。else set /a n-=1
:

@echo off
for /f "delims=" %%a in (a.txt) do call :loop "%%a"
pause
:loop
set /a n+=1
if exist "%n%.jpg" set .%n%=a&goto loop
if not defined .%~n1 (ren "%~1" "%n%.jpg"&set .%n%=a) else set /a n-=1
goto :eof
复制代码

more

经测试37楼成功,38楼不成功,原因如下:
这是a.txt的部分内容:
2.jpg
1.jpg
a.jpg
5ww.jpg
c.jpg
当call :loop 2.jpg;当n加到4的时候出错,
if exist "4.jpg" set .4=a&goto loop   ==>这句不执行
if not defined .2 ren "%~1" "4.jpg"&set .4=a    ==>这句也不执行
goto :eof    ==>一直未定义.4
所以出错

梦想种子

你逻辑顺序比较好，所以简短很多。

随风

哈哈哈哈，３７楼　和我的代码一模一样了。
哈哈。。。。

@echo off
for /f "delims=" %%a in (a.txt) do call :loop "%%a"
pause
:loop
set /a n+=1
if exist "%n%.jpg" set .%n%=a&goto loop
if not defined .%~n1 ren "%~1" "%n%.jpg"&set .%n%=a
goto :eof
复制代码

梦想种子

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in (a.txt) do (
set /a n+=1
call :check "%%i"
)
pause&exit
:check
if defined %~n1 (set /a n-=1&goto :eof)
if exist !n!.jpg (
set !n!=OK
set /a n+=1
goto check
) else (
ren %1 !n!.jpg
)
复制代码

more

哈哈,如果没有23楼的回复,我也不会贴出25楼的代码的,所以啊,正如我在22楼所说的,还没有符合题意的代码,依然在期待中........................

wankoilz

我的有错误，改正了，不过以前的测试文件比较规则，所以可以运行。思路是和more的一样。

随风

呵呵。但是你的代码统计了文件总数，同样不合题意啊。

more

好热闹，
我来说两句。
其实我们把ａ.ｔｘｔ的内容加上行号就可以很好的说明问题了
其实　梦想种子　的意思就是以行号重命名文件，１８楼的代码也确实达到如此功效。
而ｍｏｒｅ的意思好像是：
　以16个文件为例
　　若有2.jpg则不能重命名２.jpg ..........
    若有10.jpg则不能重命名10.jpg ..........
    .....................
个人认为这种思路是最理想的。

是的,我以为楼主的原意是这样的(虽然并不是),不过我的代码可达到了这个效果喔.

随风

好热闹，
我来说两句。
其实我们把ａ.ｔｘｔ的内容加上行号就可以很好的说明问题了
其实　梦想种子　的意思就是以行号重命名文件，１８楼的代码也确实达到如此功效。
而ｍｏｒｅ的意思好像是：
　以16个文件为例
　　若有2.jpg则不能重命名２.jpg ..........
    若有10.jpg则不能重命名10.jpg ..........
    .....................
个人认为这种思路是最理想的。

梦想种子

这肯定要变的啊...

按照a.txt的顺序：

2.jpg 要改成 1.jpg
1.jpg 要改成 2.jpg
a.jpg 要改成 3.jpg
5ww.jpg 要改成 4.jpg
....

注意，原来的2.jpg不同现在的2.jpg了，因为根据a.txt，要改成1.jpg...依此类推
所以，结果就是对的了。不是么？

more

更名前的内容和更名后的内容已经改变啦!
                         更名前           更名后
1.jpg                    2                               1
2.jpg                    1                               2
3.jpg                    8                               3
............

[ 本帖最后由 more 于 2008-6-15 16:47 编辑 ]

梦想种子

我运行的结果是这个：

以下为更名前的文件及对应的内容
2.jpg     1
1.jpg     2
a.jpg     3
5ww.jpg     4
c.jpg     5
f.jpg     6
rty.jpg     7
3.jpg     8
11.jpg     9
b.jpg     10
6.jpg     11
e.jpg     12
8.jpg     13
111.jpg     14
7.jpg     15
30.jpg     16
请按任意键继续. . .

以下为18楼的代码更名后的文件及对应的内容

1.jpg     1
2.jpg     2
3.jpg     3
4.jpg     4
5.jpg     5
6.jpg     6
7.jpg     7
8.jpg     8
9.jpg     9
10.jpg     10
11.jpg     11
12.jpg     12
13.jpg     13
14.jpg     14
15.jpg     15
16.jpg     16
请按任意键继续. . .

证明18楼代码没有问题。

我再把代码换成5楼的，结果还是上面的结果。所以5楼代码没有错。
究竟是怎么回事？有没有第三个人试试？

more

下面的是我的重命名代码,作一下对比就清楚了:

@echo off
setlocal enabledelayedexpansion
del /f/q *.jpg
::按a.txt的内容生成固定内容的.jpg文件(24楼)
for /f "delims=" %%i in (a.txt) do (
set /a n+=1
echo !n!>%%i
)
::显示.jpg文件里的内容,作验证用
echo 以下为更名前的文件及对应的内容
for /f "delims=" %%a in ('type a.txt') do (set/p=%%a     <nul&type %%a)
set n=0
echo.&echo 以下为更名后的文件及对应的内容&echo.
for /f "delims=" %%i in (a.txt) do set /a m+=1
for /f "delims=" %%i in (a.txt) do call :ren_ %%i
goto :count_
:ren_
if %~n1 leq %m% goto :eof
:again
set /a n+=1
if exist %n%.jpg goto :again
ren %1 %n%.jpg
goto :eof
:count_
for /l %%a in (1 1 16) do (
   set /p=%%a.jpg     <nul&type %%a.jpg
)
pause
复制代码