[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
lateol

Rank: 2

帖子
115 
积分
175 
技术
0  
捐助
0  
注册时间
2012-11-7 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2013-5-27 22:09 | 只看该作者

[文本处理] 怎么提高文本替换效率与简洁性，这有短代码谁能简化一下...

本帖最后由 lateol 于 2013-5-28 18:12 编辑 
  1. pushd "==NC==\"

  2. ::===D===

  3. fr *.TXT *.NC -r:"***:( DIA. = 21.000   R = 0.8000 )" -t:"Cutter Name: D21R0.8"

  4. fr *.TXT *.NC -r:"***:( DIA. = 20.000   R = 1.0000 )" -t:"Cutter Name: D20R1"

  5. fr *.TXT *.NC -r:"***:( DIA. = 20.000   R = 000000 )" -t:"Cutter Name: D20"

  6. fr *.TXT *.NC -r:"***:( DIA. = 17.000   R = 0.8000 )" -t:"Cutter Name: D17R0.8"

  7. fr *.TXT *.NC -r:"***:( DIA. = 12.000   R = 0.5000 )" -t:"Cutter Name: D12R0.5"

  8. fr *.TXT *.NC -r:"***:( DIA. = 12.000   R = 0.2000 )" -t:"Cutter Name: D12R0.2"

  9. fr *.TXT *.NC -r:"***:( DIA. = 12.000   R = 000000 )" -t:"Cutter Name: D12"

  10. fr *.TXT *.NC -r:"***:( DIA. = 10.000   R = 0.5000 )" -t:"Cutter Name: D10R0.5"

  11. fr *.TXT *.NC -r:"***:( DIA. = 10.000   R = 0.2000 )" -t:"Cutter Name: D10R0.2"

  12. fr *.TXT *.NC -r:"***:( DIA. = 10.000   R = 000000 )" -t:"Cutter Name: D10"

  13. fr *.TXT *.NC -r:"***:( DIA. = 8.000   R = 0.5000 )" -t:"Cutter Name: D8R0.5"

  14. fr *.TXT *.NC -r:"***:( DIA. = 8.000   R = 0.2000 )" -t:"Cutter Name: D8R0.2"

  15. fr *.TXT *.NC -r:"***:( DIA. = 8.000   R = 000000 )" -t:"Cutter Name: D8"

  16. fr *.TXT *.NC -r:"***:( DIA. = 6.000   R = 0.5000 )" -t:"Cutter Name: D6R0.5"

  17. fr *.TXT *.NC -r:"***:( DIA. = 6.000   R = 0.2000 )" -t:"Cutter Name: D6R0.2"

  18. fr *.TXT *.NC -r:"***:( DIA. = 6.000   R = 000000 )" -t:"Cutter Name: D6"

  19. fr *.TXT *.NC -r:"***:( DIA. = 4.000   R = 0.5000 )" -t:"Cutter Name: D4R0.5"

  20. fr *.TXT *.NC -r:"***:( DIA. = 4.000   R = 0.2000 )" -t:"Cutter Name: D4R0.2"

  21. fr *.TXT *.NC -r:"***:( DIA. = 4.000   R = 000000 )" -t:"Cutter Name: D4"

  22. fr *.TXT *.NC -r:"***:( DIA. = 3.000   R = 0.2000 )" -t:"Cutter Name: D3R0.2"

  23. fr *.TXT *.NC -r:"***:( DIA. = 3.000   R = 000000 )" -t:"Cutter Name: D3"

  24. fr *.TXT *.NC -r:"***:( DIA. = 2.000   R = 000000 )" -t:"Cutter Name: D2"

  25. fr *.TXT *.NC -r:"***:( DIA. = 1.000   R = 000000 )" -t:"Cutter Name: D1"

  26. ::===R===

  27. fr *.TXT *.NC -r:"***:( DIA. = 12.000   R = 6.0000 )" -t:"Cutter Name: D12R6"

  28. fr *.TXT *.NC -r:"***:( DIA. = 10.000   R = 5.0000 )" -t:"Cutter Name: D10R5"

  29. fr *.TXT *.NC -r:"***:( DIA. = 8.000   R = 4.0000 )" -t:"Cutter Name: D8R4"

  30. fr *.TXT *.NC -r:"***:( DIA. = 6.000   R = 3.0000 )" -t:"Cutter Name: D6R3"

  31. fr *.TXT *.NC -r:"***:( DIA. = 4.000   R = 2.0000 )" -t:"Cutter Name: D4R2"

  32. fr *.TXT *.NC -r:"***:( DIA. = 3.000   R = 1.5000 )" -t:"Cutter Name: D3R1.5"

  33. fr *.TXT *.NC -r:"***:( DIA. = 2.000   R = 1.0000 )" -t:"Cutter Name: D2R1"

  34. fr *.TXT *.NC -r:"***:( DIA. = 1.5000   R = 0.7500 )" -t:"Cutter Name: D1.5R0.75"

  35. fr *.TXT *.NC -r:"***:( DIA. = 1.000   R = 0.5000 )" -t:"Cutter Name: D1R0.5"

  36. fr *.TXT *.NC -r:"***:( DIA. = 0.6000   R = 0.3000 )" -t:"Cutter Name: D0.6R0.3"

  37. fr *.TXT *.NC -r:"***:( DIA. = 0.5000   R = 0.2500 )" -t:"Cutter Name: D0.5R0.25"

  38. 

  39. ::====================TZE================================

  40. fr *.TXT *.NC -r:"***:Dia:21.00  Tip Radius:.8" -t:"Cutter Name: D21R0.8"

  41. fr *.TXT *.NC -r:"***:Dia:20.00  Tip Radius:1" -t:"Cutter Name: D20R1"

  42. fr *.TXT *.NC -r:"***:Dia:17.00  Tip Radius:.8" -t:"Cutter Name: D17R0.8"

  43. fr *.TXT *.NC -r:"***:Dia:12.00  Tip Radius:6" -t:"Cutter Name: D12R6"

  44. fr *.TXT *.NC -r:"***:Dia:12.00  Tip Radius:.5" -t:"Cutter Name: D12R0.5"

  45. fr *.TXT *.NC -r:"***:Dia:12.00  Tip Radius:.2" -t:"Cutter Name: D12R0.2"

  46. fr *.TXT *.NC -r:"***:Dia:10.00  Tip Radius:5" -t:"Cutter Name: D10R5"

  47. fr *.TXT *.NC -r:"***:Dia:10.00  Tip Radius:.5" -t:"Cutter Name: D10R0.5"

  48. fr *.TXT *.NC -r:"***:Dia:10.00  Tip Radius:.2" -t:"Cutter Name: D10R0.2"

  49. fr *.TXT *.NC -r:"***:Dia:8.00  Tip Radius:4" -t:"Cutter Name: D8R4"

  50. fr *.TXT *.NC -r:"***:Dia:8.00  Tip Radius:.5" -t:"Cutter Name: D8R0.5"

  51. fr *.TXT *.NC -r:"***:Dia:8.00  Tip Radius:0.2" -t:"Cutter Name: D8R0.2"

  52. fr *.TXT *.NC -r:"***:Dia:6.00  Tip Radius:3" -t:"Cutter Name: D6R3"

  53. fr *.TXT *.NC -r:"***:Dia:6.00  Tip Radius:.5" -t:"Cutter Name: D6R0.5"

  54. fr *.TXT *.NC -r:"***:Dia:6.00  Tip Radius:.2" -t:"Cutter Name: D6R0.2"

  55. fr *.TXT *.NC -r:"***:Dia:4.00  Tip Radius:2" -t:"Cutter Name: D4R2"

  56. fr *.TXT *.NC -r:"***:Dia:4.00  Tip Radius:.5" -t:"Cutter Name: D4R0.5"

  57. fr *.TXT *.NC -r:"***:Dia:4.00  Tip Radius:.2" -t:%2
复制代码
不好意思 代码没贴完整
  1. ::====================TZE================================

  2. fr *.TXT *.NC -r:"***:Dia:21.00  Tip Radius:.8" -t:"Cutter Name: D21R0.8"

  3. fr *.TXT *.NC -r:"***:Dia:20.00  Tip Radius:1" -t:"Cutter Name: D20R1"

  4. fr *.TXT *.NC -r:"***:Dia:17.00  Tip Radius:.8" -t:"Cutter Name: D17R0.8"

  5. fr *.TXT *.NC -r:"***:Dia:12.00  Tip Radius:6" -t:"Cutter Name: D12R6"

  6. fr *.TXT *.NC -r:"***:Dia:12.00  Tip Radius:.5" -t:"Cutter Name: D12R0.5"

  7. fr *.TXT *.NC -r:"***:Dia:12.00  Tip Radius:.2" -t:"Cutter Name: D12R0.2"

  8. fr *.TXT *.NC -r:"***:Dia:10.00  Tip Radius:5" -t:"Cutter Name: D10R5"

  9. fr *.TXT *.NC -r:"***:Dia:10.00  Tip Radius:.5" -t:"Cutter Name: D10R0.5"

  10. fr *.TXT *.NC -r:"***:Dia:10.00  Tip Radius:.2" -t:"Cutter Name: D10R0.2"

  11. fr *.TXT *.NC -r:"***:Dia:8.00  Tip Radius:4" -t:"Cutter Name: D8R4"

  12. fr *.TXT *.NC -r:"***:Dia:8.00  Tip Radius:.5" -t:"Cutter Name: D8R0.5"

  13. fr *.TXT *.NC -r:"***:Dia:8.00  Tip Radius:0.2" -t:"Cutter Name: D8R0.2"

  14. fr *.TXT *.NC -r:"***:Dia:6.00  Tip Radius:3" -t:"Cutter Name: D6R3"

  15. fr *.TXT *.NC -r:"***:Dia:6.00  Tip Radius:.5" -t:"Cutter Name: D6R0.5"

  16. fr *.TXT *.NC -r:"***:Dia:6.00  Tip Radius:.2" -t:"Cutter Name: D6R0.2"

  17. fr *.TXT *.NC -r:"***:Dia:4.00  Tip Radius:2" -t:"Cutter Name: D4R2"

  18. fr *.TXT *.NC -r:"***:Dia:4.00  Tip Radius:.5" -t:"Cutter Name: D4R0.5"

  19. fr *.TXT *.NC -r:"***:Dia:4.00  Tip Radius:.2" -t:"Cutter Name: D4R0.2"

  20. fr *.TXT *.NC -r:"***:Dia:3.00  Tip Radius:1.5" -t:"Cutter Name: D3R1.5"

  21. fr *.TXT *.NC -r:"***:Dia:3.00  Tip Radius:.2" -t:"Cutter Name: D3R0.2"

  22. fr *.TXT *.NC -r:"***:Dia:2.00  Tip Radius:1" -t:"Cutter Name: D2R1"

  23. fr *.TXT *.NC -r:"***:Dia:1.00  Tip Radius:.5" -t:"Cutter Name: D1R0.5"

  24. fr *.TXT *.NC -r:"***:Dia:1.500  Tip Radius:.75" -t:"Cutter Name: D1.5R0.75"

  25. fr *.TXT *.NC -r:"***:Dia:0.600  Tip Radius:.3" -t:"Cutter Name: D0.6R0.3"

  26. fr *.TXT *.NC -r:"***:Dia:0.500  Tip Radius:.25" -t:"Cutter Name: D0.5R0.25"

  27. 

  28. fr *.TXT *.NC -r:"***:Dia:20.00  Tip Radius:0" -t:"Cutter Name: D20"

  29. fr *.TXT *.NC -r:"***:Dia:12.00  Tip Radius:0" -t:"Cutter Name: D12"

  30. fr *.TXT *.NC -r:"***:Dia:10.00  Tip Radius:0" -t:"Cutter Name: D10"

  31. fr *.TXT *.NC -r:"***:Dia:8.00  Tip Radius:0" -t:"Cutter Name: D8"

  32. fr *.TXT *.NC -r:"***:Dia:6.00  Tip Radius:0" -t:"Cutter Name: D6"

  33. fr *.TXT *.NC -r:"***:Dia:4.00  Tip Radius:0" -t:"Cutter Name: D4"

  34. fr *.TXT *.NC -r:"***:Dia:3.00  Tip Radius:0" -t:"Cutter Name: D3"

  35. fr *.TXT *.NC -r:"***:Dia:2.00  Tip Radius:0" -t:"Cutter Name: D2"

  36. fr *.TXT *.NC -r:"***:Dia:1.00  Tip Radius:0" -t:"Cutter Name: D1"

  37. 

  38. ::====================TZE2================================

  39. fr *.TXT *.NC -r:"***:TOOL NAME =" -t:"Cutter Name:"

  40. 

  41. for %%a in (D21R0.8 D20R1 D17R0.8 D12R6 D12R0.5 D12R0.2 D10R5 D10R0.5 D10R0.2 D8R4 D8R0.5 D8R0.2 D6R3 D6R0.5 D6R0.2 D4R2 D4R0.5 D4R0.2 D3R1.5 D3R0.2 D2R1 D1R0.5 D0.6R0.3 D0.5R0.25 D20 D12 D10 D8 D6 D4 D3 D2 D1 R6 R5 R4 R3 R2 R1 R0.75 R0.5) do (

  42.   for /f "delims=:" %%b in ('findstr /ic:"Cutter Name: %%a" *.NC') do (

  43.     md "%%a" 2>nul

  44.     move "%%b" "%%a\"

  45.   )

  46. )

  47. echo    ============【============处理完毕...============】============

  48. GOTO QQ
复制代码
收藏 分享

sxw

Rank: 5Rank: 5

帖子
339 
积分
669 
技术
25  
捐助
0  
注册时间
2009-9-20 
2楼
发表于 2013-5-28 07:40 | 只看该作者
这是想干啥

TOP

Batcher

Rank: 12Rank: 12Rank: 12

帖子
14932 
积分
46139 
技术
857  
捐助
745  
注册时间
2008-6-9 
3楼
发表于 2013-5-28 08:38 | 只看该作者
请给出原始文本和希望得到的文本，详细描述替换规律。
我帮忙写的代码不需要付钱。如果一定要给，请在微信群或QQ群发给大家吧。
【微信公众号、微信群、QQ群】http://bbs.bathome.net/thread-3473-1-1.html
【支持批处理之家，加入VIP会员！】http://bbs.bathome.net/thread-67716-1-1.html

TOP

tmplinshi

Rank: 7Rank: 7Rank: 7

帖子
1023 
积分
3120 
技术
230  
捐助
160  
注册时间
2010-12-22 
4楼
发表于 2013-5-28 10:43 | 只看该作者
bwfr - 替换文本中的多个字符串
http://bathome.net/thread-12910-1-1.html

TOP

lateol

Rank: 2

帖子
115 
积分
175 
技术
0  
捐助
0  
注册时间
2012-11-7 
5楼
发表于 2013-5-28 18:19 | 只看该作者
回复 3# Batcher


    已经把文本上到百度云，
http://pan.baidu.com/share/link?shareid=684456&uk=774360720
文件比较多 顺便上传了几个。

以下分别为五种显示类型在在每个文本头显示的信息，我这里叫做刀具信息。

1.
(  Dia:10.00  Tip Radius:0  Tool length:50.00 )


2.
( T - 1   L - 40   DIA. = 8.000   1_2_2 )
( DIA. = 8.000   R = 000000 )

( T - 1   L - 20   DIA. = 4.000   1_2_2_1 )
( DIA. = 4.000   R = 000000 )

( T - 1   L - 20   DIA. = 4.000   43 )
( DIA. = 4.000   R = 2.0000 )

( T - 1   L - 40   DIA. = 8.000   38_1_1_1 )
( DIA. = 8.000   R = 000000 )
、
3.
(Cutter Name: D12)

(Cutter Name: D6R3)

(Cutter Name: D4R2)

(Cutter Name: D4)

(Cutter Name: D1R0.5)

4.
( TOOL NAME = R3 , D = 6.0 , R = 3. )
( PART OFST = 0.0 , PART TOL. = 0.01 )
( DOWN STEP = 0.3 , SIDE STEP = 4.92 )

( TOOL NAME = D12 , D = 12.0 , R = 0.0 )
( PART OFST = 0.2 , PART TOL. = 0.01 )
( DOWN STEP = 0.8 , SIDE STEP = 6. )

( TOOL NAME = R1.5 , D = 3.0 , R = 1.5 )
( PART OFST = -0.03 , PART TOL. = 0.01 )
( DOWN STEP = 0.3 , SIDE STEP = 2.88 )

( TOOL NAME = D4 , D = 4.0 , R = 0.0 )
( PART OFST = 0.25 , PART TOL. = 0.01 )
( DOWN STEP = 0.12 , SIDE STEP = 2. )

( TOOL NAME = D4R0.5 , D = 4.0 , R = 0.5 )
( PART OFST = -0.07 , PART TOL. = 0.005 )
( DOWN STEP = 0.12 , SIDE STEP = 2. )
5.
(Tool Name: D12)

(Tool Diameter=12.00 )

(Tool Radius=0.00 )

刀具信息种类：
D21R0.8 D20R1 D17R0.8 D12R6 D12R0.5 D12R0.2 D10R5 D10R0.5 D10R0.2 D8R4 D8R0.5 D8R0.2 D6R3 D6R0.5 D6R0.2 D4R2 D4R0.5 D4R0.2 D3R1.5 D3R0.2 D2R1 D1R0.5 D0.6R0.3 D0.5R0.25 D20 D12 D10 D8 D6 D4 D3 D2 D1 R6 R5 R4 R3 R2 R1 R0.75 R0.5
流程：用
  1. for %%a in (D21R0.8 D20R1 D17R0.8 D12R6 D12R0.5 D12R0.2 D10R5 D10R0.5 D10R0.2 D8R4 D8R0.5 D8R0.2 D6R3 D6R0.5 D6R0.2 D4R2 D4R0.5 D4R0.2 D3R1.5 D3R0.2 D2R1 D1R0.5 D0.6R0.3 D0.5R0.25 D20 D12 D10 D8 D6 D4 D3 D2 D1 R6 R5 R4 R3 R2 R1 R0.75 R0.5) do (

  2.   for /f "delims=:" %%b in ('findstr /ic:"Cutter Name: %%a" *.NC') do (

  3.     md "%%a" 2>nul

  4.     move "%%b" "%%a\"

  5.   )

  6. )
复制代码
查找文本内容信息 找到后重名个文件夹 名字就是查找到的信息 如 (Cutter Name: D6R3) 则新建D6R3文件夹 并移动进去。以此类推。
如果 所有的文本内容的信息都显示一样 如(Cutter Name: D6R3) 这个就好办多了。可是有五种方式显示，所以部分识别不到，处理不成功。所以出现了以上方法，先替换 再识别。

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
6楼
发表于 2013-5-28 19:06 | 只看该作者
回复 5# lateol
是否想得到信息呢 还是其他
  1. @echo off

  2. findstr /ibc:"( TOOL NAME = " /c:"( PART OFST = " /c:"( DOWN STEP = " *.nc

  3. pause
复制代码

TOP

lateol

Rank: 2

帖子
115 
积分
175 
技术
0  
捐助
0  
注册时间
2012-11-7 
7楼
发表于 2013-5-28 20:12 | 只看该作者
回复 6# terse

是的 比如说 此文本内包含(Cutter Name: D4R2) 则创建 D4R2 文件夹 并把它移入内。就达到按信息分类的意思。

TOP

lateol

Rank: 2

帖子
115 
积分
175 
技术
0  
捐助
0  
注册时间
2012-11-7 
8楼
发表于 2013-5-28 20:23 | 只看该作者
本帖最后由 lateol 于 2013-5-28 20:25 编辑

回复 6# terse


   附件的文本 显示的信息类型是  
( TOOL NAME = R1 , D = 2.0 , R = 1. )
这个刀具信息为 D2R1
有点跟(Cutter Name: D2R1)
一样 所以我就用FR替换
( TOOL NAME = R1 , D = 2.0 , R = 1. ) 替换成(Cutter Name: D2R31)
这样就 可以分类。主要问题还是 信息显示不太统一 有五种，所以无法一举处理。
除非可以再写个 其他形式的BAT
谢谢你的帮忙。

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
9楼
发表于 2013-5-28 23:22 | 只看该作者
回复 8# lateol
仅针对你上面样本测试处理的
即你所诉第四种情况吧 不知是否你要的结果
  1. @echo off&setlocal enabledelayedexpansion

  2. for /f "tokens=1* delims=:" %%i in ('findstr /ic:"TOOL NAME = " *.nc') do (

  3.     if "!%%i!" == "" (

  4.     for /f "tokens=4,6 delims==,)" %%a in ("%%j") do (

  5.         set D=%%a&set R=%%b

  6.         for %%c in (D R) do for %%d in (!%%c!) do (

  7.             set %%c=%%d

  8.             for /l %%e in (1 1 6) do (

  9.                if "!%%c:~-1!" == "0" set "%%c=!%%c:~,-1!"

  10.             )

  11.             if "!%%c!" neq "0." (

  12.                 if "!%%c:~-1!" == "." set %%c=!%%c:~,-1!

  13.                 set %%c=%%c!%%c!

  14.             )else set "%%c="

  15.         )

  16.         echo !D!!R!

  17.     )

  18.   )

  19.         set "%%i=i"

  20. )

  21. pause
复制代码
1

评分人数

TOP

lateol

Rank: 2

帖子
115 
积分
175 
技术
0  
捐助
0  
注册时间
2012-11-7 
10楼
发表于 2013-5-29 00:11 | 只看该作者
回复 9# terse


    对！ 是这样。不过还有四个信息类型可以整合么。
随便在 文本内容里换个信息类型在测试、看看
只要 能正确识别五种类型信息 并进行分类 基本上就OK了 想都有点难度..- -！

代码 我在19行 加入md "!D!!R!" 2>nul
    move "%%i" "!D!!R!\"
就这样分类 就达到效果了。
谢谢 你的代码 学习了、

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
11楼
发表于 2013-5-29 00:45 | 只看该作者
因你的样本里不含有其他四个信息类型
所以不一点测试完全正确
还有就是  每个文本含四个信息的其中一个信息吗  不会重复吧

TOP

lateol

Rank: 2

帖子
115 
积分
175 
技术
0  
捐助
0  
注册时间
2012-11-7 
12楼
发表于 2013-5-29 07:40 | 只看该作者
回复 11# terse


    没有重复的

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
13楼
发表于 2013-5-29 10:07 | 只看该作者
回复 12# lateol
没完全测试 不知信息是否完整
"(Tool Name:" "(Cutter Name:" 这两信息点 多余否？
  1. @echo off&setlocal enabledelayedexpansion

  2. for /f "tokens=1,2* delims=:" %%i in ('findstr /ic:"TOOL NAME = " /c:"(Cutter Name:" /c:"( DIA. = " /c:"(  Dia:" /c:"(Tool Name:" *.nc') do (

  3.     if "!%%i!" == "" (   

  4.        set "str="

  5.        if "%%k" == "" (

  6.           for /f "tokens=2-6 delims==,)" %%a in ("%%j") do (

  7.               if "%%c" =="" (

  8.                  set D=%%a&set "R=%%b"

  9.               ) else set D=%%c&set "R=%%e"

  10.           )

  11.        ) else for /f "tokens=1-6 delims=:) " %%a in ("%%k") do (

  12.                   if "%%d" neq "" (

  13.                       set D=%%a&set "R=%%d"

  14.                   ) else set "str=%%a"

  15.               )

  16.              if "!str!" == "" (

  17.                 for %%f in (D R) do for /f %%h in ("!%%f!") do (

  18.                     set "%%f=%%h"

  19.                     for /l %%e in (1 1 6) do (

  20.                         if "!%%f:~-1!" == "0" set "%%f=!%%f:~,-1!"

  21.                    )

  22.                         if "!%%f!" neq "0." (

  23.                            if "!%%f:~-1!" == "." set "%%f=!%%f:~,-1!"

  24.                            set "%%f=%%f!%%f!"

  25.                         ) else set "%%f="

  26.                 )

  27.                           set "str=!D!!R!"

  28.             )

  29.                           echo "!str!"

  30.                           REM md "!str!"

  31.                           REM move "%%i" "!str!"

  32.                           REM set "%%i=i"

  33.     )

  34. )

  35. pause
复制代码

TOP

lateol

Rank: 2

帖子
115 
积分
175 
技术
0  
捐助
0  
注册时间
2012-11-7 
14楼
发表于 2013-5-29 23:44 | 只看该作者
回复 13# terse


    很好 测试完美 唯一的就是 处理到 ( DIA. = 4.000   R = 000000 )
这样是 因为 R是0  所以得出D4R
不过自己用变量来截取了。其他都OK
请问这个 set "str="  是什么意思？
谢谢！

TOP

terse

Rank: 8Rank: 8

帖子
2339 
积分
9739 
技术
475  
捐助
0  
注册时间
2008-2-25 
15楼
发表于 2013-5-29 23:55 | 只看该作者
回复 14# lateol
24行 替为
  1. if "!%%f!" neq "" set "%%f=%%f!%%f!"
复制代码
SET "STR="  清空变量

TOP

返回列表