如何根据文件夹内文本内容修改文件夹名称？ - 中国DOS联盟论坛

各位兄台，题目内容如下：

文件夹内有如下一些文件夹

应用传热_10057703\
传热学_10057799\
高等学校_10057810\
传热学_10988504\
高等学校_11003496\
工程热力_11014105\
传热学_11811051\
传热学与_11889166\
传热学_11897610\
传热学考_11971476\

每个文件夹内都有一个bookinfo.dat文件，里面内容格式如下：


书名=应用传热学——高等学校教材
作者=V·加纳佩西
页数=452
SS号=10057703
出版日期=1987年02月第1版

批处理文件的目的很简单，将文件夹名称改为bookinfo.dat内的书名，格式为：书名_ss号。

上面罗哩罗嗦的题目描述不知道众位能不能看明白。

我的思路是
1，尝试用dir /AD得到文件夹名称
2，用for将文件夹名分离成两部分，书名（不全的）和ss号码
3，考虑将完整的书名从bookinfo.dat提出来，用for /f可以把书名付给变量。
4，将上述两部分合并成一个批处理。

不知道上述的思路是否正确，尝试了一下午也没搞定，现在有些头脑混乱了。

妄求各位前辈帮忙

[ Last edited by hhxx on 2009-8-21 at 11:47 ]

可以用dir完全遍历dat文件
然后用place=%~fa:%~nxa=% 得到文件夹的名字然后改名

各位大侠能帮忙写一个吗, 越来越糊涂了.

打包几个文件夹传上来看看

http://upload.cn-dos.net/img/1666.rar

哦,忘记了. 感谢yishanju兄

@echo off
setlocal enabledelayedexpansion
cd /d "g:\我的文档\桌面\1666\05 历史唯物主义(唯物史观)"
for /f "delims=" %%a in ('dir /a:d /b') do (
    for /f "usebackq tokens=1,* delims==" %%i in ("%%a\bookinfo.dat") do set %%i=%%j
    ren "%%a" "!书名!_!SS号!"
)

[ Last edited by tireless on 2009-8-25 at 13:50 ]

赞, 太强大了.

遇到个小问题, 因为delims==的原因, 当书名里包含等号(=)时, 上面的bat就不能把书名都改过来了.

[ Last edited by hhxx on 2009-8-25 at 07:46 ]

已修改 6 楼代码。

如果等号可能在书名开头，用以下代码：

@echo off
setlocal enabledelayedexpansion
cd /d "g:\我的文档\桌面\1666\05 历史唯物主义(唯物史观)"
for /f "delims=" %%a in ('dir /a:d /b') do (
    for /f "usebackq skip=1 eol=出 delims=名号 tokens=1*" %%i in ("%%a\bookinfo.dat") do (
        set %%i=%%j
    )
    ren "%%a" "!书:~1!_!SS:~1!"
)

第1楼　hhxx	发表于 2009-08-21 11:46
新手上路　发帖 4　积分 4
[求助]如何根据文件夹内文本内容修改文件夹名称？各位兄台，题目内容如下：文件夹内有如下一些文件夹应用传热_10057703\ 传热学_10057799\ 高等学校_10057810\ 传热学_10988504\ 高等学校_11003496\ 工程热力_11014105\ 传热学_11811051\ 传热学与_11889166\ 传热学_11897610\ 传热学考_11971476\ 每个文件夹内都有一个bookinfo.dat文件，里面内容格式如下：书名=应用传热学——高等学校教材作者=V·加纳佩西页数=452 SS号=10057703 出版日期=1987年02月第1版批处理文件的目的很简单，将文件夹名称改为bookinfo.dat内的书名，格式为：书名_ss号。上面罗哩罗嗦的题目描述不知道众位能不能看明白。我的思路是 1，尝试用dir /AD得到文件夹名称 2，用for将文件夹名分离成两部分，书名（不全的）和ss号码 3，考虑将完整的书名从bookinfo.dat提出来，用for /f可以把书名付给变量。 4，将上述两部分合并成一个批处理。不知道上述的思路是否正确，尝试了一下午也没搞定，现在有些头脑混乱了。妄求各位前辈帮忙 [ Last edited by hhxx on 2009-8-21 at 11:47 ]

第2楼　Fair	发表于 2009-08-21 12:45
新手上路　发帖 9　积分 9
可以用dir完全遍历dat文件然后用place=%~fa:%~nxa=% 得到文件夹的名字然后改名

第3楼　hhxx	发表于 2009-08-24 12:20
新手上路　发帖 4　积分 4
各位大侠能帮忙写一个吗, 越来越糊涂了.

第4楼　yishanju	发表于 2009-08-24 19:13
银牌会员　发帖 1,357　积分 1,488
打包几个文件夹传上来看看

第5楼　hhxx	发表于 2009-08-24 20:18
新手上路　发帖 4　积分 4
http://upload.cn-dos.net/img/1666.rar 哦,忘记了. 感谢yishanju兄

第6楼　tireless	发表于 2009-08-25 00:50
银牌会员　发帖 1,122　积分 2,025
@echo off setlocal enabledelayedexpansion cd /d "g:\我的文档\桌面\1666\05 历史唯物主义(唯物史观)" for /f "delims=" %%a in ('dir /a:d /b') do ( for /f "usebackq tokens=1,* delims==" %%i in ("%%a\bookinfo.dat") do set %%i=%%j ren "%%a" "!书名!_!SS号!" ) [ Last edited by tireless on 2009-8-25 at 13:50 ]

第7楼　hhxx	发表于 2009-08-25 07:41
新手上路　发帖 4　积分 4
赞, 太强大了. 遇到个小问题, 因为delims==的原因, 当书名里包含等号(=)时, 上面的bat就不能把书名都改过来了. [ Last edited by hhxx on 2009-8-25 at 07:46 ]

第8楼　tireless	发表于 2009-08-25 13:59
银牌会员　发帖 1,122　积分 2,025
re 7 楼已修改 6 楼代码。如果等号可能在书名开头，用以下代码： @echo off setlocal enabledelayedexpansion cd /d "g:\我的文档\桌面\1666\05 历史唯物主义(唯物史观)" for /f "delims=" %%a in ('dir /a:d /b') do ( for /f "usebackq skip=1 eol=出 delims=名号 tokens=1*" %%i in ("%%a\bookinfo.dat") do ( set %%i=%%j ) ren "%%a" "!书:~1!_!SS:~1!" )