[文本处理] 【已解决】请教批处理合并文本方面的事情，谢谢前辈们

灯塔彭于晏

[i=s] 本帖最后由 灯塔彭于晏 于 2020-12-16 15:50 编辑 [/i]

各位前辈大家好，特来请教一点bat知识，想实现下面的内容。

现在有2个文本，A.TXT内容如下（每行1个数字）：
1
2
3
4
5
6
7
9
10
11
12

B.TXT内容如下：
<div class="pic-title"><p><span class="tupiantitle">#</span></p></div>
<p><img src="http://baidu.com/gangqin141.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">#</span></p></div>
<p><img src="http://baidu.com/gangqin142.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">#</span></p></div>
<p><img src="http://baidu.com/gangqin143.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">#</span></p></div>
<p><img src="http://baidu.com/gangqin144.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">#</span></p></div>
<p><img src="http://baidu.com/gangqin145.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">#</span></p></div>
<p><img src="http://baidu.com/gangqin146.jpg"/></p>  



实现将A中的内容，依次输入到B中的#中。实现效果如下：


<div class="pic-title"><p><span class="tupiantitle">1</span></p></div>
<p><img src="http://baidu.com/gangqin141.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">2</span></p></div>
<p><img src="http://baidu.com/gangqin142.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">3</span></p></div>
<p><img src="http://baidu.com/gangqin143.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">4</span></p></div>
<p><img src="http://baidu.com/gangqin144.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">5</span></p></div>
<p><img src="http://baidu.com/gangqin145.jpg"/></p>   
<div class="pic-title"><p><span class="tupiantitle">6</span></p></div>
<p><img src="http://baidu.com/gangqin146.jpg"/></p>  

……

<div class="pic-title"><p><span class="tupiantitle">12</span></p></div>
<p><img src="http://baidu.com/gangqin146.jpg"/></p>  

谢谢谢谢

smss

保存为ps1运行

$global:n = 0;
$arr = (gc A.txt -ReadCount 0) -notmatch '^\s*$';
$str = (gc B.txt -ReadCount 0) -join "`r`n";
$str = [regex]::Replace($str, '#', {$arr[$global:n++]});
sc B.txt -Value $str;
复制代码

WHY

@echo off
setlocal enabledelayedexpansion
(for /f "delims=" %%i in (b.txt) do (
    set "s=%%i"
    if "!s:>#<=!" NEQ "!s!" (
        set /p "n="
        for %%j in ("!n!") do set "s=!s:>#<=>%%~j<!"
    )
    echo;!s!
)) < a.txt
pause
复制代码

灯塔彭于晏

WHY 发表于 2020-12-16 14:34

    谢谢你啊！

qixiaobin0715

@echo off
setlocal enabledelayedexpansion
set m=0
for /f "delims=" %%a in (a.txt) do (
    set "str=%%a"
    set /a m+=1&set _!m!=%%a
)
set n=1
(for /f "delims=" %%b in (b.txt) do (
    set "var=%%b"
    set /a num=_!n!
    for %%c in (!num!) do set "var=!var:>#<=>%%c<!"
    if not "!var!"=="%%b" set /a n+=1
    echo !var!
))>c.txt
pause
复制代码