gawk "/^:abcd$/,/^goto :EOF$/{if(/^:abcd$/){print;while((getline < \"NewTxt.txt\")>0){print}}if(/^goto :EOF$/)print;next}1" 1.bat>2.bat
复制代码

@echo off
(for /f "skip=1 tokens=1* delims=]" %%i in ('find /v /n "" test.bat') do (
    if "%%j"==":abcd" (
        set n=true
        echo,%%j
        type NewTxt.txt
    ) else if defined n (
        if "%%j"=="goto :EOF" (
            echo,%%j
            set n=
        )
    ) else (
        echo,%%j
)
))>New-test.bat
pause
复制代码

gawk -v IGNORECASE=1 "NR==FNR{a[NR]=$0;next}!n{print}!n&&/^:abcd$/{for(i in a)print a[i];n=1}n&&/^goto :EOF$/{print;n=0}" NewTxt.txt 1.bat > 2.bat
复制代码

@echo off
for /f "delims=" %%i in ('findstr /n .* 1.bat') do (
    set "s=%%i"
    setlocal enabledelayedexpansion
    set "s=!s:*:=!"
    if not defined flag (
        echo;!s!
        if /i "!s!" == ":abcd" (
            endlocal
            type NewTxt.txt | find /v ""
            set flag=1
        ) else (
            endlocal
        )
    ) else if /i "!s!" == "goto :EOF" (
        echo;!s!
        endlocal
        set "flag="
    )  else (
        endlocal
    )
)
pause
复制代码

var txtFileName = 'NewTxt.txt';  //txt文件名
var batFileName = '1.bat';       //修改前bat文件名
var dstFileName = '2.bat';       //修改后bat文件名

var fso = new ActiveXObject('Scripting.FileSystemObject');

var s1 = fso.OpenTextFile(txtFileName, 1).ReadAll();  //读txt文本内容
var s2 = fso.OpenTextFile(batFileName, 1).ReadAll();  //读bat文本内容

s1 = s1.replace(/(?!\r\n).$/, '$&\r\n');  //txt结尾添加回车换行
s2 = s2.replace(/^(:abcd\r\n)(?:(?!goto :EOF)[\s\S])+(?=goto :EOF)/mi, '$1' + s1); //替换内容

fso.OpenTextFile(dstFileName, 2, true).Write(s2);

WSH.Echo('Done')
复制代码

gawk "/^:goto EOF$/{n=0}!n{print}/^:abcd$/{n=1;while((getline<\"NewTxt.txt\")>0)print;next}" 1.bat>2.bat
复制代码