找回密码
 注册
搜索
[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
查看: 22961|回复: 2

[文件操作] 请帮我做一个文件夹中文件批量重命名的批处理,谢谢!

[复制链接]
发表于 2012-12-29 00:38:04 | 显示全部楼层 |阅读模式
某文件夹中有许多*.txt文件,提取第一行内容作为本文件的文件名,
  1. @echo off
  2. setlocal enabledelayedexpansion
  3. for /f "delims=" %%i in ('dir /b *.txt') do (
  4. set n=
  5. for /f %%j in (%%i) do (
  6.   if "!n!"=="" ren "%%i" "%%j.txt"
  7.   set n=found
  8. )
  9. )
复制代码
网上找了这一段
如果第一行的内容如果有相同,如何重命名时文件名如何自动标出1、3、4、5、6、7、8、9、10、11.....,请问要如何改进?先谢了
发表于 2012-12-29 00:59:33 | 显示全部楼层
本帖最后由 batman 于 2012-12-29 01:06 编辑

  1. @echo off&setlocal enabledelayedexpansion
  2. for /f "delims=" %%a in ('dir /b *.txt') do (
  3.    set /p str=<"%%a"
  4.    if not defined !str! (
  5.       ren "%%a" "!str!.txt"
  6.       set "!str!=a"
  7.       ) else (
  8.       set /a n=0&call :lp "%%a"
  9.    )
  10. )
  11. exit
  12. :lp
  13. set /a n+=1
  14. if not exist "%str% %n%.txt" (
  15.   ren %1 "%str% %n%.txt"
  16.   ) else (
  17.   goto lp
  18. )
复制代码
 楼主| 发表于 2012-12-29 20:52:39 | 显示全部楼层
太好了,就是这样,谢谢了
您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-19 20:30 , Processed in 0.016549 second(s), 7 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表