中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名：www.cn-dos.net　论坛域名：www.cn-dos.net/forum

游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟

中国DOS联盟论坛
现在时间是 2026-08-08 16:13

共 47,811 主题排行 / 349,895 发帖 / 今日 0 篇 / 48,253 会员排行

DOS批处理 & 脚本技术（批处理室） » 文本文件批量改名

可打印版本　829 / 12

第1楼　dddyjq1	发表于 2008-05-19 22:30
初级用户　发帖 108　积分 175
文本文件批量改名能否帮忙写一个文本文件批量改名的批处理？要求有：将同一文件夹下的按1、2、3....的.TXT文件改成文件开头第一行的文件名,如果第一行有括号"(",则取括号之前的,有逗号","的则全部要取

第2楼　HAT	发表于 2008-05-19 22:39
版主　发帖 5,017　积分 9,023
既有(又有,怎么办？

第3楼　dddyjq1	发表于 2008-05-19 22:43
初级用户　发帖 108　积分 175
取(之前的,谢了

第4楼　terse	发表于 2008-05-19 23:08
银牌会员　发帖 946　积分 2,404
@echo off for /f "tokens=" %%i in ('dir /b .txt^\|findstr /i "^."') do call:lp "%%i" pause&goto :eof :lp for /f "usebackq delims=(" %%a in (%1) do ren %1 "%%a%~x1"&goto :eof [ Last edited by terse on 2008-5-19 at 11:40 PM* ]

第5楼　dddyjq1	发表于 2008-05-19 23:11
初级用户　发帖 108　积分 175
高,谢了,以后好好学习DOS,昨天发现有本站

第6楼　bat-zw	发表于 2008-05-19 23:13
金牌会员　发帖 1,276　积分 3,105
试着只用一个for,但比较麻烦： @echo off&setlocal enabledelayedexpansion for /f "delims=" %%i in ('dir /b .txt') do ( set /p a=<%%i set str=!a!&set a=!a:(=! if not "!a!"=="!str!" set a=&call :lp ren "%%i" "!a!.txt" ) echo 重命名完毕！ pause>nul&goto :eof :lp if not "%str:~,1%"=="(" ( set b=%str:~,1% set a=!a!%b% set str=%str:~1% goto lp ) [ Last edited by zw19750516 on 2008-5-20 at 12:55 AM* ]

第7楼　bat-zw	发表于 2008-05-19 23:22
金牌会员　发帖 1,276　积分 3,105
Originally posted by terse at 2008-5-19 23:08: @echo off for /f "delims=" %%i in ('dir /b .txt^\|findstr /i "^."') do ( for /f "usebackq delims=(" %%a in ("%%i") do ren "%%i" &qu ... 代码有误，楼主是要求用第一行命名，兄弟的怕是用最后一行命名吧，如文本中存在一行以上内容，就达不到楼主的要求了。 [ Last edited by zw19750516 on 2008-5-19 at 11:24 PM ]

第8楼　terse	发表于 2008-05-19 23:25
银牌会员　发帖 946　积分 2,404
Originally posted by zw19750516 at 2008-5-19 23:22: 代码有误，楼主是要求用第一行命名，兄弟的怕是用最后一行命名吧，如文本中存在一行以上内容，就达不到楼主的要求了。 [ Last edited by zw19750516 on 2008-5-19 at 11:24 PM ] 是的修正一下

第9楼　bat-zw	发表于 2008-05-19 23:31
金牌会员　发帖 1,276　积分 3,105
Originally posted by terse at 2008-5-19 23:08: @echo off for /f "tokens=" %%i in ('dir /b .txt^\|findstr /i "^.*"') do call:lp "%%i" pause&goto :eof :lp for /f "usebackq delims=(" %% ... 文件后面多了个.

第10楼　terse	发表于 2008-05-19 23:39
银牌会员　发帖 946　积分 2,404
Originally posted by zw19750516 at 2008-5-19 23:31: 文件后面多了个. zw19750516真细心我本想添上.txt的后来还是没用上去 [ Last edited by terse on 2008-5-19 at 11:41 PM ]

第11楼　bat-zw	发表于 2008-05-20 00:05
金牌会员　发帖 1,276　积分 3,105
简化我的化码： @echo off&setlocal enabledelayedexpansion for /f "delims=" %%i in ('dir /b .txt') do ( set /p str=<%%i&call :lp ren "%%i" "!a!.txt"&set "a=" ) echo 重命名完毕！ pause>nul&goto :eof :lp if defined str if not "%str:~,1%"=="(" ( set b=%str:~,1% set a=!a!%b% set str=%str:~1% goto lp ) [ Last edited by zw19750516 on 2008-5-20 at 12:07 AM* ]

第12楼　dddyjq1	发表于 2008-05-20 00:06
初级用户　发帖 108　积分 175
谢谢各位了

第13楼　bat-zw	发表于 2008-05-20 00:50
金牌会员　发帖 1,276　积分 3,105
晕，回来一看还有错误，再改： @echo off&setlocal enabledelayedexpansion for /f "delims=" %%i in ('dir /b .txt') do ( set /p str=<%%i&call :lp ren "%%i" "!a!.txt"&set a=&set b= ) echo 重命名完毕！ pause>nul&goto :eof :lp if defined str if not "%str:~,1%"=="(" ( set b=%str:~,1% set a=!a!!b! set str=%str:~1% goto lp ) [ Last edited by zw19750516 on 2008-5-20 at 12:52 AM* ]

[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023