[文本处理] 批处理如何删除多个文本里行尾的指定字符串

L1900

在目录 D:\tt\ 下有很多txt文件, 如何把每个txt文件中，行尾的“bb”、“cc”的字符串删除？

Nsqs

:on error resume next
:sub class_bat
	' 2>nul&echo off&cls
	cscript -nologo -e:vbs "%~0"
	pause
	exit sub
:end sub
set fso=createobject("scripting.filesystemobject")
set regexp=new regexp
set f=fso.getfolder(".")
regexp.global=-1:regexp.ignorecase=-1
regexp.pattern="(.*)(bb|cc)"
wsh.echo "演示结果:"
for each list in f.files
	if fso.getextensionname(list)="txt" then
	wsh.echo string(15,"-"),fso.getfilename(list),string(15,"-")
		read=fso.opentextfile(list).readall
		change=RegExp.Replace(read,"$1")
		fso.createtextfile(file).write change
		wsh.echo change
	end if
next
set f=nothing:set fso=nothing:set regexp=nothing
复制代码

flyinnet9

@echo off
setlocal ENABLEDELAYEDEXPANSION
cd /d d:\tt\
for /f "delims=" %%i in ('dir /a-d /b d:\tt\*.txt') do (
  (for /f "usebackq delims=" %%a in ("%%i") do (
    set str=%%a
    for %%b in (bb cc) do (
      if "!str:~-2!"=="%%b" (set str=!str:~0,-2!&echo.!str!&set f=1)
    )
    if not defined f echo.!str!
    set f=
  ))>$
  move /y $ "%%i" >nul
)
pause
复制代码

L1900

回复 3# flyinnet9

flyinnet9, 大哥， “D:\tt\”目录下，有很多文件夹，文件夹里也有很多txt文件，该怎么办？

大哥，你的微信号是？我发红包给你。

请提供完整的代码！

Nsqs

回复 4# L1900


    楼主只会伸手,问问题不先说明清楚,开头没有指明文件夹,现在又说要处理子文件夹 你真能折腾人