[已解决]2个文本，怎样用BAT将同一行的合在一起生成新文本？

每天几分

现在有2个文本，一个是错误文本，一个是纠错文本，怎样将他们合在一起？

文本1：
被听的一清二楚
不敢置信的看向
不急不缓的回答
不急不缓的说道
……
一副画
一副药
……

文本2：
=被听得一清二楚
=不敢置信地看向
=不急不缓地回答
=不急不缓地说道
……
=一幅画
=一付药
……

要求生成如下

文本3：
被听的一清二楚=被听得一清二楚
不敢置信的看向=不敢置信地看向
不急不缓的回答=不急不缓地回答
不急不缓的说道=不急不缓地说道
……
一副画=一幅画
一副药=一付药
……

apang

保存为bat，不能含特殊字符，需1.txt和2.txt行数相同

1. @echo off&setlocal enabledelayedexpansion
   
2. (for /f "delims=" %%a in (1.txt) do (
   
3.   set /p str=
   
4.   echo,%%a!str!
   
5. ))<2.txt>3.txt
   
6. pause

复制代码

vbs，需2.txt的行数不小于1.txt

1. Dim FSO,File,A,B
   
2. Set FSO = CreateObject("Scripting.FileSystemObject")
   
3. File = FSO.OpenTextFile("1.txt",1).ReadAll
   
4. A = Split(File,vbCrLf)
   
5. File = FSO.OpenTextFile("2.txt",1).ReadAll
   
6. B = Split(File,vbCrLf)
   
7. For i = 0 To Ubound(A)
   
8.   A(i) = A(i) & B(i)
   
9. Next
   
10. FSO.CreateTextFile("3.txt",True).Write Join(A,vbCrLf)

复制代码