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

DDDYJQ1

某文件夹中有许多*.txt文件,提取第一行内容作为本文件的文件名，

@echo off
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b *.txt') do (
set n=
for /f %%j in (%%i) do (
  if "!n!"=="" ren "%%i" "%%j.txt"
  set n=found
)
)
复制代码

网上找了这一段
如果第一行的内容如果有相同，如何重命名时文件名如何自动标出1、3、4、5、6、7、8、9、10、11.....，请问要如何改进？先谢了

batman

@echo off&setlocal enabledelayedexpansion
for /f "delims=" %%a in ('dir /b *.txt') do (
   set /p str=<"%%a"
   if not defined !str! (
      ren "%%a" "!str!.txt"
      set "!str!=a"
      ) else (
      set /a n=0&call :lp "%%a"
   )
)
exit
:lp
set /a n+=1
if not exist "%str% %n%.txt" (
  ren %1 "%str% %n%.txt"
  ) else (
  goto lp
)
 
复制代码

DDDYJQ1

太好了，就是这样，谢谢了