apang

@set @n=0;//&dir /b *.txt|cscript -nologo -e:jscript "%~0"&pause&exit/b
a = 1; b = 5; //从倒数第1行到倒数第5行
x = b-a+1; y = a-1; //x=删除行数，y=结尾剩余行数
fso = new ActiveXObject("Scripting.FileSystemObject");
re = new RegExp('^([\\s\\S]*?)(.*\\n){'+x+'}((.*\\n){'+y+'})$','');
while (!WSH.StdIn.AtEndOfStream) {
    f = WSH.StdIn.ReadLine();
    txt = fso.OpenTextFile(f,1).ReadAll();
    if (txt.substr(txt.length-2) != '\r\n') txt += '\r\n'
    txt = txt.replace(re, '$1$3');
    fso.OpenTextFile(f,2).Write(txt);
}
复制代码

apang

回复 4# xp3000


    2楼代码你试过没有？
不想用sed的话，试试纯批：

@echo off
set /p Input=输入指定行：
for /f "delims=" %%a in ('dir /a-d /b *.txt') do (
    set "n="
    (for /f "usebackq delims=" %%b in ("%%a") do (
        set /a "n+=1,1/(n-Input)" 2>nul && echo,%%b
    ))>$
    move $ "%%a"
)
pause
复制代码