[文本处理] 【已解决】求助：批处理给同名文件文件名添加序号

lj670

大神的批处理文件，把文件名导入文本，如何改成二次运行后，同名文件在文件名后添加序号，例如，运行后获取11.txt文本文件，再次运行获取11（1）.txt文本文件

@echo off
cd /d "%~dp0"
set "OutFile=11.txt"
(for /f "delims=" %%i in ('dir /b /a-d *.*') do (
    if "%%i" neq "%OutFile%" (
        echo,%%~ni
    )
))>"%OutFile%"
复制代码

BingjianREMIX

回复 1# lj670

@echo off
:start
cd /d "%~dp0"
set /a "fx=0"
set "OutFile=11 (%fx%) .txt"
if exist "11 (0) .txt" set /a "fx=%fx%+1"
echo %fx%
(for /f "delims=" %%i in ('dir /b /a-d *.*') do (
    if "%%i" neq "%OutFile%" (
        echo,%%~ni
    ) else if "%fx%"=="0" (
       set "OutFile=11.txt"
))>"%OutFile%"
)
pause
goto :start
复制代码

BingjianREMIX

回复 2# BingjianREMIX


    一些不对

@echo off
:start
cd /d "%~dp0"
set /a "fx=0"
set "OutFile=11 (%fx%) .txt"
if exist "11 (0) .txt" set /a "fx=%fx%+1"
(for /f "delims=" %%i in ('dir /b /a-d *.*') do (
    if "%%i" neq "%OutFile%" (
        echo,%%~ni
    )
)
if "%fx%" equ "0" (
       set "OutFile=11.txt"
)
)>"%OutFile%"
pause
goto :start
复制代码

lj670

回复 3# BingjianREMIX


    运行后得到11 (0) .txt文本文件，再次运行只会覆盖这个文件，没有添加序号重命名，辛苦了谢谢

BingjianREMIX

回复 4# lj670

@echo off
cd /d "%~dp0"
if not exist 11.txt (
    set /a "fx=0"
)
if exist "11.txt" (
   set /a "fx=0"
   set /a "b=1"
   set /a "fx=%fx%+1"
   set "OutFile=11 (%fx%) .txt"
)
if "%fx%" equ "0" (
       set "OutFile=11.txt"
)
:1
(for /f "delims=" %%i in ('dir /b /a-d *.*') do (
    if "%%i" neq "%OutFile%" (
        echo,%%~ni
    )
))>"%OutFile%"
if exist "11 (0) .txt" (
   ren "11 (0) .txt" "11 (1) .txt"
)
复制代码

BingjianREMIX

回复 5# BingjianREMIX


    连用即可

lj670

回复 5# BingjianREMIX


    第一次运行得到11.txt文件，第二次运行得到11 () .txt文件，可以得到2个不同名的文本文件，谢谢

BingjianREMIX

回复 7# lj670


    丢到terminal里连用,或者代码开头加个:start,结尾加个pause和goto

77七

@echo off
set str=list
set #"%str%.txt"=1
if exist "%str%.txt" (
	for /l %%l in (2,1,1000) do (
		set #"%str%(%%l).txt"=1
		if not exist "%str%(%%l).txt" (
			set "file=%str%(%%l).txt"
			goto :next
		)
	)
) else (
	set "file=%str%.txt"
)
:next
(for /f "delims=" %%i in ('dir /b /a-d ^|find /v "%~nx0"') do (
	if not defined #"%%i" (
		echo %%~ni
	)
))>"%file%"
pause
复制代码

aloha20200628

一。代码用批处理脚本文件名存盘(记事本ANSI编码)，如 a.cmd，不要放在目标文件目录
二。'输出目录' 和 '目标文件目录' 以及 输出文件'前缀名' 皆可修改
三。输出文件名序号从（1）开始
三。脚本运行结尾用文件资源管理器锚定输出文件位置

@echo off
set "outDir=D:\输出目录"
set "srcDir=D:\目标文件目录"
if not exist "%outDir%" (md "%outDir%" 2>nul)
cd /d "%outDir%"
for /f %%k in ('dir /b/a-d "前缀名*.txt" 2^>nul^|find /v /c "" ') do (set/a "n=%%k+1")
set "outFile=%outDir%\前缀名（%n%）.txt"
cd /d "%srcDir%" 2>nul
(for /f "delims=" %%i in ('dir /b /a-d *.*') do echo,%%~ni)>"%outFile%"
if exist "%outFile%" (explorer.exe /select, "%outFile%")
exit/b
复制代码

lj670

回复 9# 77七


    非常棒！！！多次运行获得文件会依次排序，完美！谢谢！！