批处理之家 » BAT求助&讨论 » [已解决]BAT脚本批量修改文件问题

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

返回列表发帖

Rank: 1

帖子: 18
积分: 34
技术: 0
捐助: 0
注册时间: 2021-5-1

1楼 跳转到 » 倒序看帖

字体大小: tT

发表于 2021-5-1 23:33 | 只看该作者

[文件操作] [已解决]BAT脚本批量修改文件问题

请教大神，我写了个批量修改文件在用的时候发现遇到转换后有重名就会转换不成功，怎么实现自动重命名？这是我现在的代码

@echo off
for /f "delims=" %%i in ('dir /b /a-d /s "*.docx"') do ren "%%i" "%%~ni.doc"
pause
复制代码

Rank: 5 Rank: 5

帖子: 1066
积分: 1453
技术: 103
捐助: 0
注册时间: 2010-6-20

2楼

发表于 2021-5-2 00:54 | 只看该作者

@echo off
setlocal enableDelayedExpansion


for /f "delims=" %%i in ('dir /b /a-d /s "*.docx"') do (
    call :f1 %%i
)
goto :END

:f1
set filename=%~n1
:loop
if exist "!filename!.doc" (
    set /a filename+=1
    goto :loop
)
ren "%1" "!filename!.doc"
goto :eof

:END
复制代码

Rank: 1

帖子: 18
积分: 34
技术: 0
捐助: 0
注册时间: 2021-5-1

3楼

发表于 2021-5-2 08:20 | 只看该作者

回复 2# newswan

运行了没有反应大神，也没有转换成功！

Rank: 5 Rank: 5

帖子: 304
积分: 1430
技术: 51
捐助: 0
注册时间: 2009-2-18

4楼

发表于 2021-5-2 09:44 | 只看该作者

for /f "delims=" %%i in ('dir /b/a-d/s *.docx')do if exist "%%~dpni.doc" (ren "%%i" "%%~ni1.doc")else ren "%%i" "%%~ni.doc"
复制代码

1 评分人数

xjhbbs: 直接明了，可以用技术 + 1

如无特别说明，代码测试环境均为 XP SP3

Rank: 5 Rank: 5

帖子: 1066
积分: 1453
技术: 103
捐助: 0
注册时间: 2010-6-20

5楼

发表于 2021-5-2 10:02 | 只看该作者

@echo off
setlocal enableDelayedExpansion


for /f "delims=" %%i in ('dir /b /s "*.docx"') do (
    call :f1 "%%i"
)
goto :END

:f1
set filename=%~n1
:loop
if exist "%~dp1!filename!.doc" (
    set /a filename+=1
    goto :loop
)
ren %1 %filename%.doc
goto :eof

:END
复制代码

子目录，没注意你那里有 /s 参数

1 评分人数

xjhbbs: 可以用。技术 + 1

Rank: 1

帖子: 18
积分: 34
技术: 0
捐助: 0
注册时间: 2021-5-1

6楼

发表于 2021-5-2 14:10 | 只看该作者

回复 4# cutebe

谢谢谢谢！

Rank: 1

帖子: 18
积分: 34
技术: 0
捐助: 0
注册时间: 2021-5-1

7楼

发表于 2021-5-2 14:10 | 只看该作者

回复 5# newswan

好的，可以了，谢谢

Rank: 12

帖子: 14919
积分: 46124
技术: 857
捐助: 745
注册时间: 2008-6-9

8楼

发表于 2021-5-3 11:22 | 只看该作者

回复 1# xjhbbs

参考：
https://mp.weixin.qq.com/s/_1qzhObTSbc6HRpJy4onhQ

我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html