tmplinshi

::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: 工具下载地址
::     sed 4.0.7 win换行
::     http://bathome.net/thread-15605-1-4.html
::
::     GNU Awk 3.1.0
::     http://sourceforge.net/projects/unxutils/files/
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::

@echo off

:: --------------------- 设置 ---------------------
set "folder=e:\我的文档\桌面"
set "filename=a.xml"
set "str=xxxx"
:: --------------------- /设置 ---------------------

:: 创建文件列表
dir /s /b "%folder%\%filename%" >.tmp

:: 统计文件个数
for /f %%a in (' find /c /v "" ^< .tmp ') do (
    set /a total = %%a, count = 0
)

:: 替换
for /f "delims=" %%a in (.tmp) do (
    call :replace "%%a"
)

:: 退出
set /p =处理完毕！按回车键退出. . . <nul
pause >nul
exit /b


:replace
    set /a count += 1
    title %count% / %total%
    echo %1
    
    gawk "{gsub(/%str%/,\"\n^&\")};{print}" FS="%str%" %1 | gawk "{sub(/%str%/,++n-1 \"^&\");print}" | sed -r ":a;N;$!ba;s/\n([0-9]+)%str%/\1/g" >.tmp
    
    move .tmp %1
    goto :eof
复制代码

下载“gawk.exe sed.exe test.bat.zip”：
http://files.getwebb.org/view-cre63ai1.html

tmplinshi

回复 3# nicevoice


    需要下载 gawk 和 sed。代码的开头有下载地址。或者在代码的下面，我已经打包好了 gawk.exe sed.exe test.bat 这三个文件。

tmplinshi

回复 6# nicevoice


    好。多谢。[email]tmplinshi@gmail.com[/email]

tmplinshi

@echo off

:: --------------------- 设置 ---------------------
set "folder=e:\我的文档\桌面"
set "filename=a.xml"
set "str=xxxx"
:: --------------------- /设置 ---------------------

:: 创建文件列表
dir /s /b "%folder%\%filename%" >.tmp

:: 统计文件个数
for /f %%a in (' find /c /v "" ^< .tmp ') do (
    set /a total = %%a, count = 0
)

:: 替换
for /f "delims=" %%a in (.tmp) do (
    call :replace "%%a"
)

:: 退出
set /p =处理完毕！按回车键退出. . . <nul
pause >nul
exit /b


:replace
    set /a count += 1
    title %count% / %total%
    echo %1
    
    gawk -v n=-1 "{for (i = 1; i < NF; i++){++n; printf($i n)}; print $NF}" "FS=%str%" %1 >.tmp
    
    move .tmp %1
    goto :eof
复制代码