[已解决]按文件名移动文件的批处理如何精简？

achu

文件名	文件夹
x月份aa	f(aa) \x月份
第x季度bb	f(bb)\x季度
第X期CC	f(cc)\x期

将同一目录下EXCEL文件移动到相应文件夹，文件名为“x月份aa”、“第x季度bb”、“第X期CC”，根据命名相应移到文件夹下，对应关系见上表

1. echo off
   
2. for /f %%i in ('dir /b *.xls') do (
   
3.     setlocal enabledelayedexpansion
   
4.     for /f "tokens=1,3,4 delims=_" %%j in ('dir /b %%i') do (
   
5.         set cir=%%l
   
6.         
   
7.         if "!cir:~2,1!"=="月" (
   
8.            set circle=!cir:~0,4!  
   
9.            echo !circle!
   
10.            set name=!cir:~4!
    
11.            echo !name!
    
12.            if "!circle!"=="11月份"  ( set ftime=11月  
    
13.                   echo !ftime!
    
14.            )
    
15.            if "!circle!"=="12月份"  ( set ftime=12月  
    
16.                   echo !ftime!
    
17.            )
    
18.          )  else if "!cir:~2,1!"=="期" (
    
19.          
    
20.            set circle=!cir:~0,3!
    
21.            echo !circle!
    
22.            set name=!cir:~3!
    
23.            echo !name!
    
24.             if "!circle!"=="第一期"  set ftime=一期
    
25.             if "!circle!"=="第二期"  set ftime=二期
    
26.             if "!circle!"=="第三期"  set ftime=三期
    
27.             if "!circle!"=="第四期"  set ftime=四期
    
28.         ) else if "!cir:~2,1!"=="季" (
    
29.            set circle=!cir:~0,4!
    
30.            echo !circle!
    
31.            set name=!cir:~4!
    
32.            echo !name!
    
33.            if "!circle!"=="第一季度"  set ftime=1季度
    
34.            if "!circle!"=="第二季度"  set ftime=2季度
    
35.            if "!circle!"=="第三季度"  set ftime=3季度
    
36.            if "!circle!"=="第四季度"  set ftime=4季度
    
37.         )

复制代码

在论坛搜索了一番，不知道自己的问题在哪里，请各位大侠指点！谢谢啦！

[ 本帖最后由 achu 于 2010-7-29 17:05 编辑 ]

s700800900

貌似没短多少。

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. for /f "delims=" %%a in ('dir /b "*.xls"') do (
   
4. set "t=%%a"
   
5. set "t=!t:月份=：!"
   
6. if /i not "!t!" equ "%%a" (
   
7. for /f "tokens=1,2 delims=：." %%b in ("!t!") do (
   
8. md "f(%%c)"
   
9. move /y "%%a" "f(%%c)\%%b月份.xls"
   
10. )
    
11. )
    
12. set "t=!t:季度=：!"
    
13. if /i not "!t!" equ "%%a" (
    
14. for /f "tokens=1,2 delims=：." %%b in ("!t!") do (
    
15. set "tt=%%b"
    
16. set "tt=!tt:~1,1!"
    
17. md "f(%%c)"
    
18. move /y "%%a" "f(%%c)\!tt!季度.xls"
    
19. )
    
20. )
    
21. set "t=!t:期=：!"
    
22. if /i not "!t!" equ "%%a" (
    
23. for /f "tokens=1,2 delims=第：." %%b in ("!t!") do (
    
24. md "f(%%c)"
    
25. move /y "%%a" "f(%%c)\%%b期.xls"
    
26. )
    
27. )
    
28. )

复制代码

achu

谢谢你的解答啊，
我正在学习，不过"t=!t:月份=：!"看不懂，刚刚也没搜到相关的帖子，能解答一下吗？

achu

精简很多了，尤其是这句话t=!t:月份=：!，比我原来的精简好多

不过不太理解的是，为什么要加if /i not "!t!" equ "%%c"判断？

achu

将同一目录下EXCEL文件移动到相应文件夹，文件名为“x月份aa”、“第x季度bb”、“第X期CC”，根据命名相应移到文件夹下，对应关系见下表

文件名           文件夹          备注
n月份aa         xx\n月           aa与xx是对应关系
第n季度bb     yy\n季度        bb与yy是对应关系
第n期cc         zz\n期           cc与zz是对应关系

代码如下，经过s700800900指点，已经精简了很多，感觉重复代码还是不少，不知道能否再精简.请大家多多指点!谢谢！

1.   
   
2. @echo off
   
3. setlocal enabledelayedexpansion
   
4. for /f %%i in ('dir /b *.xls')  do (
   
5. for /f "tokens=1,3,4 delims=_" %%a in ('dir /b %%i') do (
   
6.     set "t=%%c"
   
7.     set "t=!t:月份=：!"
   
8.    
   
9.     if /i not "!t!" equ "%%c" (
   
10.         for /f "tokens=1,2 delims=：." %%e in ("!t!") do (
    
11.             set str=%%f
    
12.             if "!str!"=="aa" set pname=xx
    
13.             if "!str!"=="bb" set pname=yy
    
14.             if "!str!"=="cc" set pname=zz
    
15.             if "!str!"=="dd" set pname=uu
    
16.             if "!str!"=="ee" set pname=vv        
    
17.             echo !pname!
    
18.         )
    
19.      )
    
20.      set "t=!t:季度=：!"
    
21.      if /i not "!t!" equ "%%c" (
    
22.          for /f "tokens=1,2 delims=：." %%e in ("!t!") do (
    
23.              set "tt=%%e"
    
24.              set "tt=!tt:~1,1!"
    
25.              set str=%%f
    
26.                if "!str!"=="aa" set pname=xx
    
27.             if "!str!"=="bb" set pname=yy
    
28.             if "!str!"=="cc" set pname=zz
    
29.             if "!str!"=="dd" set pname=uu
    
30.             if "!str!"=="ee" set pname=vv            
    
31.             echo !pname!
    
32.             
    
33.           )
    
34.       )
    
35.      set "t=!t:期=：!"
    
36.      if /i not "!t!" equ "%%c" (
    
37.          for /f "tokens=1,2 delims=第：." %%e in ("!t!") do (
    
38.              set str=%%f
    
39.                if "!str!"=="aa" set pname=xx
    
40.             if "!str!"=="bb" set pname=yy
    
41.             if "!str!"=="cc" set pname=zz
    
42.             if "!str!"=="dd" set pname=uu
    
43.             if "!str!"=="ee" set pname=vv            
    
44.             echo !pname!
    
45.             
    
46.          )
    
47.       )
    
48. )
    
49. )

复制代码

s700800900

啊，这个  t=!t:月份=：!  是把t变量中的字符串“月份”替换为“：”，
假如有一个文件名为 "12月份啊.xls" ，把它赋给t后，再执行 t=!t:月份=：!  ，t 变量的值就会变为 "12：啊.xls"
而 if /i not "!t!" equ "%%a" 是判断 原 t 的值是否和 替换后的 t 值相等，如果不相等，说明原来的 t 值里存在“月份”关键字，这时就会执行 if 括号内的命令了。

同理的， "t=!t:季度=：!" 和 "t=!t:期=：!" 也和上面的类似，后面的if语句都是为了判断原 t 变量内是否在相应的关键字。

achu

谢谢s700800900！讲解得非常详细，感谢你！

s700800900

改进了一下。你看看

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. 
   
4. set "name=aa bb cc dd ee"
   
5. set "aa=xx"
   
6. set "bb=yy"
   
7. set "cc=zz"
   
8. set "dd=uu"
   
9. set "ee=vv"
   
10. 
    
11. for /f "delims=" %%i in ('dir /b "*.xls"') do (
    
12. for /f "tokens=1,3,4 delims=_" %%a in ("%%i") do (
    
13.     set "t=%%c"
    
14.     set "t=!t:月份=：!"
    
15.     if /i not "!t!" equ "%%c" (
    
16.         for /f "tokens=1,2 delims=：." %%e in ("!t!") do (
    
17.             set "str=%%f"
    
18.             for %%g in (!name!) do (
    
19.             if /i "!str!" equ "%%g" set pname=!%%g!
    
20.                 )
    
21.             echo !pname!
    
22.         )
    
23.      )
    
24.         set "t=%%c"
    
25.      set "t=!t:季度=：!"
    
26.      if /i not "!t!" equ "%%c" (
    
27.          for /f "tokens=1,2 delims=：." %%e in ("!t!") do (
    
28.             set "tt=%%e"
    
29.             set "tt=!tt:~1,1!"
    
30.             set "str=%%f"
    
31.             for %%g in (!name!) do (
    
32.             if /i "!str!" equ "%%g" set pname=!%%g!
    
33.                 )
    
34.         echo !pname!
    
35.           )
    
36.       )
    
37.      set "t=%%c"
    
38.      set "t=!t:期=：!"
    
39.      if /i not "!t!" equ "%%c" (
    
40.          for /f "tokens=1,2 delims=第：." %%e in ("!t!") do (
    
41.             set "str=%%f"
    
42.             for %%g in (!name!) do (
    
43.             if /i "!str!" equ "%%g" set pname=!%%g!
    
44.                 )
    
45.            echo !pname!
    
46.          )
    
47.       )
    
48. )
    
49. )
    
50. pause

复制代码

achu

在另一个帖子里已回复了，真的很感谢你！代码运行通过，还学到了好几个知识点！