难题求助!用.txt内容重新命名对应.pdf文件,可否批量处理? - 中国DOS联盟论坛

你上传的附件中的 a.txt 里面每行末尾都有一个空格，如果实际是这样的话，把 23 楼的改成：

@echo off&setlocal enabledelayedexpansion
for /f "tokens=*" %%a in (a.txt) do (
  set var=%%a
  ren "!var:~-14,1!!var:~-12,3!!var:~-8,2!!var:~-5,4!?????.pdf" "!var:~,5!_!var:~-14,-1!_!var:~6,-15!.pdf"
)

另，4.2.8 显示输入单元PC 2x / 5x / 8x IPC 5.4.0.0 / IPC 5.5.0.0 9-082-42-8110，其中的 / 不能作为文件名，要手工把文本中的 / 替换掉，或者把代码中的 set var=%%a 改成 set var=%%a&set var=!var:/=／!

[ Last edited by tireless on 2009-4-30 at 12:07 ]

楼主上传的内容是想得到什么结果，最好能一并说明，才好解决

如果想改成这样一个文件名：
4.2.8 显示输入单元PC 2x / 5x / 8x IPC 5.4.0.0 / IPC 5.5.0.0 9-082-42-8110
那是不可能的。

估计他的pdf文件名应该有 “10位数字相同加不同的5位字母” 的格式，
比如 1234567890abcd.pdf 和 1234567890efghi.pdf
那么用ren 数字????? 的方式应该是完不成的。
关键是有10万个，必须考虑效率问题啊。
另外楼主的txt文件内容和pdf文件是一一相对的吗？没有多余的行？
还有你们是怎么下载的附件啊？
楼主在11楼说问题解决，16楼又给出了新的样本？
新样本中需要按怎样的格式重命名文件呢？

回复31-32楼的朋友们：今天是五一节，没想到你们都在！真是很意外！

回复31楼tireless: 谢谢您的建议，“/”符号和空格可以手动去掉。现在您的两个方案，我都保留，不断用新的内容会去测试。十分感谢！

回复32楼netbenton: 测试过10楼您自己打包的文件，全部文件改名都OK。但是，测试我要的文件时，出现问题。所以，我在30楼说，将我要的文件打包上传，想请您和各位也可实际测试一下代码的效果。符号/的问题，我会注意去掉的。谢谢哦！

回复32楼netbenton:
回复33楼26933062:
重新命名的文件名格式是：数字.数字.数字_(下划线)一位数字-三位数字-两位数字-四位数字_(下划线)文字描述(只有中文;有中文和英文;有中文和英文和数字三种情况).pdf
例如: 0.0.0_1-234-56-7890_掌上明珠.pdf

txt文件内容和pdf文件是一一相对，没有多余的行，和上传打包里面的的a.txt是一样的。如下：
4.1.1 接通机器KF,FL,KL,VF 9-082-41-1071
4.1.1 启动机床PC22 9-082-41-1091
4.2.8 显示输入单元PC2x / 5x / 8x IPC5.4.0.0 / IPC5.5.0.0 9-082-42-8110
4.3.1 schuler机床数据采集系统BASIC 9-082-43-1002
4.7.2 PC22开始菜单 9-082-47-2011
第三行里面的“/”没有手动去掉，是想保持一个“原生态”给各位参考一下。

11楼讲的是测试结果。目前测试过，达到想要效果的有23楼的代码，8楼的代码文件名的顺序有点不一样。从31楼开始的代码会稍后再测。

[ Last edited by irene6851 on 2009-4-30 at 23:35 ]

你上传的 1452.rar 里面的 a.txt 每行末尾确实有一个空格。

O...又查了一次，的确有空格，不好意思！

删除那一句。

[ Last edited by irene6851 on 2009-4-30 at 23:24 ]

1.复制下面代码,保存为re.js到a.txt所在目录运行.
2.运行生成的js.bat.

srcfl="a.txt"
fso=new ActiveXObject("scripting.filesystemobject")
sss=fso.opentextfile(srcfl,1).readall();
sss=sss.replace(/\\/g,"＼");
sss=sss.replace(/\//g,"／");
sss=sss.replace(/:/g,"：");
sss=sss.replace(/\*/g,"＊");
sss=sss.replace(/</g,"〈");
sss=sss.replace(/>/g,"〉");
sss=sss.replace(/\|/g,"｜");
sss=sss.replace(/^\s*(\d.\d.\d)\s*(\S.*\S)\s*(\d)\s*-\s*(\d\d\d)\s*-\s*(\d\d)\s*-\s*(\d\d\d\d)\s*$/gmi,"ren \"$3$4$5$6*.pdf\"   \"$1_$3$4$5$6_$2.pdf\"\r\n")
fso.createtextfile("js.bat").write(sss)

注:
1.a.txt中的文件名可以是以下形式(处理后文件名为"4.1.1_9082411071_接通机器KF, FL, KL, VF.pdf")
　　　　　＂　　4.1.1 接通机器KF, FL, KL, VF 9-082-41-1071 　　＂
　　　　　＂4.1.1 接通机器KF, FL, KL, VF 9 - 082　- 41 - 1071 ＂
　　　　　＂4.1.1接通机器KF, FL, KL, VF 9-082- 41- 1071 ＂
　　　　　＂4.1.1接通机器KF, FL, KL, VF9-082-41 -1071 ＂

2.如果a.txt中含有\/:*?"<>等非法字符,脚本将自动替换成对应的中文符号

[ Last edited by freeants001 on 2009-5-1 at 01:45 ]

就你给的样本文件，测试是成功的。但需删除每行末尾的空格。
txt中的 / 符号不是合法的文件名，代码中自动将其替换为#号。
还是那句话，所有pdf文件中，不能有10位数字顺序一样的情况
比如：1234567890abcde.pdf 和 1234567890efghi.pdf
数字部分完全一样，只有字母不同，就不行。


@echo off&setlocal enabledelayedexpansion
for /f "tokens=1* delims= " %%a in (a.txt) do (
   for /f "tokens=1* delims=-" %%i in ("%%b") do (
      set var=%%i&set "var2=%%j"&set "var=!var:/=#!"
      set "num=!var:~-1!!var2:-=!"
      ren "!num!?????.pdf" "%%a_!var:~-1!-!var2!_!var:~0,-2!.pdf"
))
pause

这样呢？


@echo off&setlocal enabledelayedexpansion
for /f "tokens=1*" %%a in (a.txt) do (
      set "str=%%b"
      set "var=%%~nb"
      set var=!var:~-13!
      set "str=!str:~,-15!"
      echo ren "!var:-=!?????.pdf" "%%a_!var! _!str:/=#!.pdf"
)
pause

第31楼　tireless	发表于 2009-04-30 11:58
银牌会员　发帖 1,122　积分 2,025
Re 30楼你上传的附件中的 a.txt 里面每行末尾都有一个空格，如果实际是这样的话，把 23 楼的改成： @echo off&setlocal enabledelayedexpansion for /f "tokens=" %%a in (a.txt) do ( set var=%%a ren "!var:~-14,1!!var:~-12,3!!var:~-8,2!!var:~-5,4!?????.pdf" "!var:~,5!_!var:~-14,-1!_!var:~6,-15!.pdf" ) 另，4.2.8 显示输入单元PC 2x / 5x / 8x IPC 5.4.0.0 / IPC 5.5.0.0 9-082-42-8110，其中的 / 不能作为文件名，要手工把文本中的 / 替换掉，或者把代码中的 set var=%%a 改成 set var=%%a&set var=!var:/=／! [ Last edited by tireless on 2009-4-30 at 12:07* ]

第32楼　netbenton	发表于 2009-04-30 12:28
银牌会员　发帖 752　积分 1,916　来自广西
楼主上传的内容是想得到什么结果，最好能一并说明，才好解决如果想改成这样一个文件名： 4.2.8 显示输入单元PC 2x / 5x / 8x IPC 5.4.0.0 / IPC 5.5.0.0 9-082-42-8110 那是不可能的。

第33楼　26933062	发表于 2009-04-30 13:44
银牌会员　发帖 879　积分 2,268
估计他的pdf文件名应该有 “10位数字相同加不同的5位字母” 的格式，比如 1234567890abcd.pdf 和 1234567890efghi.pdf 那么用ren 数字????? 的方式应该是完不成的。关键是有10万个，必须考虑效率问题啊。另外楼主的txt文件内容和pdf文件是一一相对的吗？没有多余的行？还有你们是怎么下载的附件啊？楼主在11楼说问题解决，16楼又给出了新的样本？新样本中需要按怎样的格式重命名文件呢？

第34楼　irene6851	发表于 2009-04-30 22:51
初级用户　发帖 16　积分 28
回复31-32楼的朋友们：今天是五一节，没想到你们都在！真是很意外！回复31楼tireless: 谢谢您的建议，“/”符号和空格可以手动去掉。现在您的两个方案，我都保留，不断用新的内容会去测试。十分感谢！回复32楼netbenton: 测试过10楼您自己打包的文件，全部文件改名都OK。但是，测试我要的文件时，出现问题。所以，我在30楼说，将我要的文件打包上传，想请您和各位也可实际测试一下代码的效果。符号/的问题，我会注意去掉的。谢谢哦！回复32楼netbenton: 回复33楼26933062: 重新命名的文件名格式是：数字.数字.数字_(下划线)一位数字-三位数字-两位数字-四位数字_(下划线)文字描述(只有中文;有中文和英文;有中文和英文和数字三种情况).pdf 例如: 0.0.0_1-234-56-7890_掌上明珠.pdf txt文件内容和pdf文件是一一相对，没有多余的行，和上传打包里面的的a.txt是一样的。如下： 4.1.1 接通机器KF,FL,KL,VF 9-082-41-1071 4.1.1 启动机床PC22 9-082-41-1091 4.2.8 显示输入单元PC2x / 5x / 8x IPC5.4.0.0 / IPC5.5.0.0 9-082-42-8110 4.3.1 schuler机床数据采集系统BASIC 9-082-43-1002 4.7.2 PC22开始菜单 9-082-47-2011 第三行里面的“/”没有手动去掉，是想保持一个“原生态”给各位参考一下。 11楼讲的是测试结果。目前测试过，达到想要效果的有23楼的代码，8楼的代码文件名的顺序有点不一样。从31楼开始的代码会稍后再测。 [ Last edited by irene6851 on 2009-4-30 at 23:35 ]

第35楼　tireless	发表于 2009-04-30 23:03
银牌会员　发帖 1,122　积分 2,025
Re 34 楼你上传的 1452.rar 里面的 a.txt 每行末尾确实有一个空格。

第36楼　irene6851	发表于 2009-04-30 23:18
初级用户　发帖 16　积分 28
O...又查了一次，的确有空格，不好意思！删除那一句。 [ Last edited by irene6851 on 2009-4-30 at 23:24 ]

第37楼　freeants001	发表于 2009-05-01 00:14
中级用户　发帖 244　积分 330　来自湖北
1.复制下面代码,保存为re.js到a.txt所在目录运行. 2.运行生成的js.bat. srcfl="a.txt" fso=new ActiveXObject("scripting.filesystemobject") sss=fso.opentextfile(srcfl,1).readall(); sss=sss.replace(/\\/g,"＼"); sss=sss.replace(/\//g,"／"); sss=sss.replace(/:/g,"："); sss=sss.replace(/\/g,"＊"); sss=sss.replace(/</g,"〈"); sss=sss.replace(/>/g,"〉"); sss=sss.replace(/\\|/g,"｜"); sss=sss.replace(/^\s(\d.\d.\d)\s(\S.\S)\s(\d)\s-\s(\d\d\d)\s-\s(\d\d)\s-\s(\d\d\d\d)\s$/gmi,"ren \"$3$4$5$6.pdf\" \"$1_$3$4$5$6_$2.pdf\"\r\n") fso.createtextfile("js.bat").write(sss) 注: 1.a.txt中的文件名可以是以下形式(处理后文件名为"4.1.1_9082411071_接通机器KF, FL, KL, VF.pdf") 　　　　　＂　　4.1.1 接通机器KF, FL, KL, VF 9-082-41-1071 　　＂　　　　　＂4.1.1 接通机器KF, FL, KL, VF 9 - 082　- 41 - 1071 ＂　　　　　＂4.1.1接通机器KF, FL, KL, VF 9-082- 41- 1071 ＂　　　　　＂4.1.1接通机器KF, FL, KL, VF9-082-41 -1071 ＂ 2.如果a.txt中含有\/:?"<>等非法字符,脚本将自动替换成对应的中文符号 [ Last edited by freeants001 on 2009-5-1 at 01:45 ]

第38楼　26933062	发表于 2009-05-01 05:13
银牌会员　发帖 879　积分 2,268
就你给的样本文件，测试是成功的。但需删除每行末尾的空格。 txt中的 / 符号不是合法的文件名，代码中自动将其替换为#号。还是那句话，所有pdf文件中，不能有10位数字顺序一样的情况比如：1234567890abcde.pdf 和 1234567890efghi.pdf 数字部分完全一样，只有字母不同，就不行。 @echo off&setlocal enabledelayedexpansion for /f "tokens=1* delims= " %%a in (a.txt) do ( for /f "tokens=1* delims=-" %%i in ("%%b") do ( set var=%%i&set "var2=%%j"&set "var=!var:/=#!" set "num=!var:~-1!!var2:-=!" ren "!num!?????.pdf" "%%a_!var:~-1!-!var2!_!var:~0,-2!.pdf" )) pause

第39楼　terse	发表于 2009-05-01 07:23
银牌会员　发帖 946　积分 2,404
这样呢？ @echo off&setlocal enabledelayedexpansion for /f "tokens=1*" %%a in (a.txt) do ( set "str=%%b" set "var=%%~nb" set var=!var:~-13! set "str=!str:~,-15!" echo ren "!var:-=!?????.pdf" "%%a_!var! _!str:/=#!.pdf" ) pause