txt文本批量把文件名添加到文本内容的每一行，不要txt后缀，按照文件名排序？

不清楚你的实际文件/情况，仅以问题中的样例/说明为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起运行

<# :

cls&echo off

rem 在多个txt文本文件内的每一行开头分别添加/插入自身文件名称和递增数字序号

set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4

title %#% +%$%%$%/%@% %z%

cd /d "%~dp0"

powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312')))) -Args '%~f0'"

echo%#% +%$%%$%/%@% %z%

pause

exit

#>

$ext=@(".txt")

$self=get-item -liter $args[0]

$path=$self.Directory.FullName

$newfolder=$path+'\#result'

if(-not (test-path -liter $newfolder)){[void](md $newfolder)}

$enc=[Text.Encoding]::GetEncoding('GB2312')

$files=@(dir -liter $path|?{($ext -contains $_.Extension) -and ($_ -is [System.IO.FileInfo])})

[System.Collections.ArrayList]$s=@()write-host $files[0].Name

$text=[IO.File]::ReadAllLines($files[0].FullName, $enc)

for($j=0$j -lt $text.count$j++){

$line=$files[0].BaseName+($j+1).toString()+' '+$text[$j]

[void]$s.add($line)

}

$newfile=$newfolder+'\'+$files[0].Name

[IO.File]::WriteAllLines($newfile, $s, $enc)

不清楚你的实际文件/情况，仅以问题中的说明及猜测为据

复制粘贴到记事本，另存为xx.bat，编码选ANSI，跟要处理的文件放一起运行@echo off

rem 在txt文本文件里的每一行开头添加/插入文件名称

set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4

title %#% +%$%%$%/%@% %z%

cd /d "%~dp0"

set "newfolder=#rsult"

if not exist "%newfolder%" (md "%newfolder%")

for /f "delims=" %%a in ('dir /a-d/b *.txt') do (

    echo"%%a"

    (for /f "tokens=1* delims=:" %%b in ('findstr /n .* "%%a"') do (

        echo%%~na %%c

    ))>"%newfolder%\%%~nxa"

)

:end

echo%#% +%$%%$%/%@% %z%

pause

exit

1、打开要添加后缀的文件，点击新建TXT文档。

2、打开TXT文档，输入

setlocal enabledelayedexpansion

for /f "delims=" %%i in ('dir /b') do ren "%%i" "%%i".店名

pause

然后点击保存。

3、保存后，把TXT后缀改为bat。

4、d出窗口，点击是。

5、然后点击运行批处理。

6、运行后，就可以在后缀后面加上后缀了。

---