[已解决]批处理重命名文件名+1的形式

xjhbbs · 发表于 2021-5-6 10:12:08

请教大神，当碰到有重名的，就会把重名文件变成1.doc, 我想改下，当碰到有重名时，改成文件名+1, 比如我要转换的原文件名是：测试.docx, 当碰到有重名时，转换后会变成：测试1.doc，如果已经有: 测试1.doc文件，那么就会自动再加1，变成: 测试2.doc。原文件名不变的情况下+1。。现在是直接把原文件名给改了。变成1.doc,2.doc了。

xp3000 · 发表于 2021-5-6 10:39:51

倒数第三行ren %1 %filename%.doc改为ren %1 测试%filename%.doc是不是你想要的

xjhbbs · 发表于 2021-5-6 10:43:58

回复 2# xp3000

不是固定测试，是跟据我原文件名自动+1，当有重名时，在原文件名后面自动+1

qixiaobin0715 · 发表于 2021-5-6 10:57:58

本帖最后由 qixiaobin0715 于 2021-5-6 11:00 编辑

将
set /a filename+=1
改为
set /a n+=1
set filename=!filename!!n!
goto :loop
)
set n=0
行吗？

Batcher · 发表于 2021-5-6 11:07:36

回复 1# xjhbbs

参考：批处理复制或重命名文件的时候对重复文件依次添加数字序号
http://bbs.bathome.net/thread-11423-1-1.html#pid72681
http://bbs.bathome.net/thread-9355-1-1.html#pid60783
http://bbs.bathome.net/thread-9355-1-1.html#pid60621

cutebe · 发表于 2021-5-6 11:15:53

要识别原有数字估计得有50行代码

xjhbbs · 发表于 2021-5-6 11:31:33

回复 4# qixiaobin0715

按你的方法可以大神，不错，是我想要的效果。。不过我的脚本还有个小BUG，就是在运行时，我发现当文件名中间有空格的话，就转换不成功了。
比如：测试.docx，这样的文件名，中间有一个空格的话，就转换不成功了。。是那里有问题？

cutebe · 发表于 2021-5-6 12:07:52

::改扩展名.docx为.doc，重名则添加/修改数字后缀。
@echo off
setlocal enableDelayedExpansion
for /f "delims=" %%i in ('dir /b/a-d/s *.docx')do (
if exist "%%~dpni.doc" (
call :docx2doc docName "%%i"
ren "%%i" "!docName!"
)else ren "%%i" "%%~ni.doc"
)
goto :eof
::====完====
:docx2doc docName docxPath
setlocal
pushd %~dp2
set/am=1,@2=1
for /l %%n in (0 1 9)do set _%%n=%%n
set "strNum=%~n2"
:numlp ::取末尾数字
if defined _%strNum:~-1% (
set/aLen+=1,m*=10
set n=%strNum:~-1%%n%
set strNum=%strNum:~,-1%
goto :numlp
)
if "%Len%"=="" set/a num1=Len=1&goto :nend
:nnext
set/an1=1%n%+1
set/ah=n1/m
set num1=!@%h%!!n1:~-%Len%!
if "%h%"==2 set/aLen+=1,m*=10
:nend
set "fName=%strNum%%num1%.doc"
if exist "%fName%" set n=%num1%&goto :nnext
popd
endlocal&set "%1=%fName%"
goto :eof

复制代码

1152 · 发表于 2021-5-6 12:17:07

回复 7# xjhbbs

那么代码就要加上英文引号。

qixiaobin0715 · 发表于 2021-5-6 12:37:54

回复 7# xjhbbs
ren "%1" "%filename%.doc"

xjhbbs · 发表于 2021-5-6 15:00:37

回复 9# 1152

谢谢

xjhbbs · 发表于 2021-5-6 15:00:42

回复 10# qixiaobin0715

谢谢

qixiaobin0715 · 发表于 2021-5-6 17:27:26

回复 1# xjhbbs
问题解决后，最好不要编辑顶楼帖子，便于有相似需求的人作为参考。

qixiaobin0715 · 发表于 2021-5-6 17:30:26

回复 6# cutebe
应当不会那么复杂，以前好像写过类似代码，20行左右。

1152 · 发表于 2021-5-6 17:36:09

回复 11# xjhbbs

http://www.bathome.net/thread-58507-1-1.html
帮帮忙

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文件操作] [已解决]批处理重命名文件名+1的形式

评分

评分

评分

评分