中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --

联盟域名:www.cn-dos.net  论坛域名:www.cn-dos.net/forum
DOS,代表着自由开放与发展,我们努力起来,学习FreeDOS和Linux的自由开放与GNU精神,共同创造和发展美好的自由与GNU GPL世界吧!

游客:  注册 | 登录 | 命令行 | 会员 | 搜索 | 上传 | 帮助 »
中国DOS联盟论坛 » DOS批处理 & 脚本技术(批处理室) » 批量修改文件名,只保留前6位
« [1] [2] [3] »
作者:
标题: 批量修改文件名,只保留前6位 上一主题 | 下一主题
Billunique
中级用户

菜鸟总动员


积分 259
发帖 112
注册 2006-8-28
状态 离线
『第 16 楼』:  

有没有方法将最后一个_前面的所有内容作为一个token,而_后的作为另一个token,请教......



★①②③④⑤⑥⑦⑧⑨⑩㈠㈡㈢㈣㈤㈥㈦㈧㈨㈩ⅠⅡⅢⅣⅤⅥⅦⅧⅨⅩⅪⅫ【●】→←↑↓▲
2007-9-18 18:14
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wudixin96
银牌会员





积分 1928
发帖 931
注册 2007-1-6
状态 离线
『第 17 楼』:  


@echo off
for /r %%i in (*.mp3) do (
  set nm=%%~ni
  call :js
  call ren "%%i" "%%nm%%.mp3"
)
pause

:js
set nm=%nm:*_=%
echo %nm%|find "_">nul 2>nul&&goto js||goto :eof
能达到效果,只是效率太低

2007-9-18 18:59
查看资料  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 18 楼』:  

试试下面这个,如果文件名中最后一个_字符后面的字符串中含有空格,会将空格替换成"#":
@echo off & setlocal EnableDelayedExpansion
for %%a in (*.mp3) do (
        set file_name=%%a
        set file_rname=!file_name: =#!
        set file_rname=!file_rname:_=;!
        for %%b in (!file_rname!) do set new_file_name=%%b
        rename "!file_name!" "!new_file_name!"
)


2007-9-18 19:22
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 19 楼』:  

改进一下也可以不用替换空格:
@echo off & setlocal EnableDelayedExpansion
for %%a in (*.mp3) do (
        set file_name=%%a
        set file_rname=!file_name: =#!
        set file_rname=!file_rname:_=;!
        for %%b in (!file_rname!) do set new_file_name=%%b
        set new_file_name=!new_file_name:#= !
        rename "!file_name!" "!new_file_name!"
)


2007-9-18 19:27
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
Billunique
中级用户

菜鸟总动员


积分 259
发帖 112
注册 2006-8-28
状态 离线
『第 20 楼』:  

哈,感谢二位,经测试都达到了效果!

  to wudixin96:在下粗浅,兄的招法过高,对echo %nm%|find "_">nul 2>nul&&goto js不是很明白。

  to lxmxn:这样的思路你都能想出来,人才啊,PF!



★①②③④⑤⑥⑦⑧⑨⑩㈠㈡㈢㈣㈤㈥㈦㈧㈨㈩ⅠⅡⅢⅣⅤⅥⅦⅧⅨⅩⅪⅫ【●】→←↑↓▲
2007-9-19 10:09
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wudixin96
银牌会员





积分 1928
发帖 931
注册 2007-1-6
状态 离线
『第 21 楼』:  

lxmxn
兄的效率很高,比偶的强多了,只是如果最后一个_后面的字符里包含#的话,

就会被替换为空格了。

2007-9-19 10:38
查看资料  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 22 楼』:  



  Quote:
Originally posted by wudixin96 at 2007-9-19 10:38:
lxmxn
兄的效率很高,比偶的强多了,只是如果最后一个_后面的字符里包含#的话,

就会被替换为空格了。

再改进一下:
@echo off & setlocal EnableDelayedExpansion
for %%a in (*.mp3) do (
        set file_name=%%a
        set file_rname=!file_name: =\!
        set file_rname=!file_rname:_=;!
        for %%b in (!file_rname!) do set new_file_name=%%b
        set new_file_name=!new_file_name:\= !
        echo rename "!file_name!" "!new_file_name!"
)


2007-9-19 11:25
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wudixin96
银牌会员





积分 1928
发帖 931
注册 2007-1-6
状态 离线
『第 23 楼』:  

那如果字符中还带;号呢,不是又把分好当成分隔符了??

2007-9-19 11:48
查看资料  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 24 楼』:  

嗯,程序总有点bug的,只有尽可能多的排除一些特殊情况,根据情况来修改代码了。

2007-9-19 12:02
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
wudixin96
银牌会员





积分 1928
发帖 931
注册 2007-1-6
状态 离线
『第 25 楼』:  

o(∩_∩)o...哈哈,没见你上QQ嘛

2007-9-19 12:05
查看资料  发短消息 网志   编辑帖子  回复  引用回复
lxmxn
版主




积分 11386
发帖 4938
注册 2006-7-23
状态 离线
『第 26 楼』:  

或者借助外部工具了.
@echo off
for %%a in (*.mp3) do (
for /f "delims=" %%b in ('echo\%%a^|sed "s/.*_\(.*\.mp3\)/\1/"') do echo rename "%%a" "%%b"
)
pause
ps:QQ常年隐身了..

[ Last edited by lxmxn on 2007-9-19 at 12:11 PM ]

2007-9-19 12:10
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
jmz573515
银牌会员




积分 1212
发帖 464
注册 2006-12-13
状态 离线
『第 27 楼』:  


set fso=createobject("scripting.filesystemobject")
set folder=fso.getfolder(".")
for each file in folder.files
    if ucase(right(file,3))="MP3" and instr(file,"_")<>0 then
        set wj=fso.getfile(file)
        wj.name=cl(file) & ".mp3"
    end if
next
msgbox "操作成功!",4096,"提示"
function cl(filename)
    filename=fso.getbasename(filename)
    n=instrrev(filename,"_")
    cl=mid(filename,n+1)
end function


   此帖被 +4 点积分     点击查看详情   
评分人:【 lxmxn 分数: +4  时间:2007-9-20 12:33


2007-9-20 10:10
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
bush
银牌会员




积分 2165
发帖 730
注册 2004-4-21
状态 离线
『第 28 楼』:  

很難說有沒有重名~
不如來更直接的:
ren  ??????*.jpg  ??????.jpg
還是可以啊


2007-12-29 23:59
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
everest79
金牌会员

一叶枝头,万树皆春



积分 2564
发帖 1127
注册 2006-12-25
状态 离线
『第 29 楼』:  

ren *.txt ??????.txt

2007-12-30 00:05
查看资料  发短消息 网志   编辑帖子  回复  引用回复
bush
银牌会员




积分 2165
发帖 730
注册 2004-4-21
状态 离线
『第 30 楼』:  re:『第 29 楼』:

兄弟所言正解!
我把注意力都集中在六位數上了^-^


2007-12-30 00:25
查看资料  发送邮件  发短消息 网志   编辑帖子  回复  引用回复
« [1] [2] [3] »
请注意:您目前尚未注册或登录,请您注册登录以使用论坛的各项功能,例如发表和回复帖子等。


可打印版本 | 推荐给朋友 | 订阅主题 | 收藏主题



论坛跳转: