请教：如何删除某路径下多个txt文件的最后一行内容

connie87 · 发表于 2018-3-14 17:06:53

请教：如何删除某路径下多个txt文件的最后一行内容？
不借助第三方工具，该如何实现。

新手，请多关照，谢谢。

WHY · 发表于 2018-3-14 21:54:02

举例：

复制代码

yhcfsr · 发表于 2018-3-16 07:34:48

@echo off
rem 源目录
set "SrcDir=D:\test folder"
rem 输出目录
set "OutDir=D:\result"
for /f "delims=" %%a in ('dir /a-d/s/b "%SrcDir%\*.txt"') do (
setlocal enabledelayedexpansion
for /f "delims=" %%b in ('type "%%a"') do set/a n+=1
(for /f "delims=" %%i in ('findstr /n ".*" "%%a"') do set/a x+=1&&if !n! gtr !x! (
set "var=%%i"&&set var=!var:*:=!
echo;!var!
))>"%OutDir%\%%~nxa"
endlocal
)

复制代码

WHY · 发表于 2018-3-16 10:14:53

复制代码

复制代码

屡败屡战 · 发表于 2018-3-16 11:26:10

yhcfsr 老师，这个问题我也想问一下，
假如我想删除多个txt文件的倒数第二行、倒数第三行、倒数第四行....
那么在您的代码中该如何修改？？请告知

yhcfsr · 发表于 2018-3-17 07:57:59

本帖最后由 yhcfsr 于 2018-3-17 08:04 编辑

回复 5# 屡败屡战
善用回复功能，否则我看不到消息。这次是偶然点进来才看到，此天意。

@echo off
rem 源目录
set "SrcDir=D:\test"
rem 输出目录
set "OutDir=D:\result"
rem 需要忽略的行，倒数行用负数表示，如倒数第2行为-2，行号间用空格(或,;制表符等)隔离。
set "lines=5;-2;-4;10"
for /f "delims=" %%a in ('dir /a-d/s/b "%SrcDir%\*.txt"') do (
setlocal enabledelayedexpansion
rem 计算总行数
for /f "delims=" %%b in ('type "%%a"') do set/a n+=1
rem 计算忽略的行号
for %%c in (%lines%) do (if %%c lss 0 (set/a ln=!n!+%%c+1&&set "lns=!ln! !lns!") else (set "lns=%%c !lns!"))
rem 处理文本，忽略指定行，输出结果
(for /f "delims=" %%i in ('findstr /n ".*" "%%a"') do set/a x+=1&&echo !x!|findstr /v /r "!lns!">nul&&(
set "var=%%i"&&set var=!var:*:=!
echo;!var!
))>"%OutDir%\%%~nxa"
endlocal
)
pause&exit

复制代码

屡败屡战 · 发表于 2018-3-17 08:12:17

yhcfsr老师:感谢之情，不溢言表。very good！！

		自动登录	找回密码
密码			注册

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

[文本处理] 请教：如何删除某路径下多个txt文件的最后一行内容