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

Rank: 2

帖子
54 
积分
184 
技术
0  
捐助
0  
注册时间
2009-3-20 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2013-4-16 16:25 | 只看该作者

[文本处理] [已解决]这个代码怎么改成兼容多分割地址的批处理？

下面这段带代码是读取a.txt批量修改文件名 现在出现的问题是这个代码是根据"/"分隔了多少名称来修改文件名的
  1. @echo off

  2. for /f "delims=" %%a in (a.txt) do (

  3.   set "str=%%a"  

  4.   call :lp %%str:/= %%

  5. )

  6. pause&goto :eof

  7. :lp

  8. set/a n+=1

  9. if %n% lss 10 (set "name=X00%n%%~x6") else set "name=X0%n%%~x6"

  10. if exist "%6" ren "%6" "%name%"
复制代码
比如说a.txt里面的"http://img01.taobaocdn.com/imgextra/i1/737837801/T2q8enXoJXXXXXXXXX_!!737837801.jpg”用"/"分割了6个名称，另一个a.txt里面用"/"分了不等的名称，可能是3个、4个、5个等等。如果这样的话每次使用都得修改
  1. if %n% lss 10 (set "name=X00%n%%~x6") else set "name=X0%n%%~x6"

  2. if exist "%6" ren "%6" "%name%"
复制代码
代码中的两个X6和两个%6，有没有办法改成兼容的代码！
1

评分人数

    • Batcher: 感谢给帖子标题标注[已解决]字样PB + 2
收藏 分享

BAT-VBS

Rank: 8Rank: 8

帖子
888 
积分
6682 
技术
88  
捐助
0  
注册时间
2012-10-27 
2楼
发表于 2013-4-16 17:31 | 只看该作者 
  1. @echo off

  2. for /f "delims=" %%a in (a.txt) do (

  3.     call :lp %%~nxa

  4. )

  5. goto :eof

  6. 

  7. :lp

  8. set /a n+=1

  9. if %n% lss 10 (

  10.     set "name=X00%n%%~x1"

  11. ) else (

  12.     set "name=X0%n%%~x1"

  13. )

  14. if exist "%1" (

  15.     ren "%1" "%name%"

  16. )
复制代码
2

评分人数

TOP

apang

Rank: 8Rank: 8

帖子
2085 
积分
14204 
技术
665  
捐助
0  
注册时间
2011-11-27 
3楼
发表于 2013-4-16 17:49 | 只看该作者 
  1. @echo off

  2. set /a n=1000

  3. for /f "delims=" %%a in (a.txt) do (

  4.    set "Name=%%~nxa"

  5.    set /a n+=1

  6.    setlocal enabledelayedexpansion

  7.    if exist "!Name!" ren "!Name!" "X!n:~-3!%%~xa"

  8.    endlocal

  9. )

  10. pause
复制代码
2

评分人数

TOP

samsung4203

Rank: 2

帖子
54 
积分
184 
技术
0  
捐助
0  
注册时间
2009-3-20 
4楼
发表于 2013-4-16 17:54 | 只看该作者
多谢Apang大哥！ 问题解决了！

TOP

samsung4203

Rank: 2

帖子
54 
积分
184 
技术
0  
捐助
0  
注册时间
2009-3-20 
5楼
发表于 2013-4-16 17:55 | 只看该作者
多谢BAT-VBS！问题解决了

TOP

BAT-VBS

Rank: 8Rank: 8

帖子
888 
积分
6682 
技术
88  
捐助
0  
注册时间
2012-10-27 
6楼
发表于 2013-4-16 18:14 | 只看该作者
回复 5# samsung4203


    问题解决后，请编辑顶楼帖子在标题前面注明[已解决]，并给回答者加分。

TOP

wangx

Rank: 1

帖子
53 
积分
79 
技术
2  
捐助
0  
注册时间
2013-7-27 
7楼
发表于 2014-11-3 15:59 | 只看该作者
对我很有帮助，学习啦。

TOP

返回列表