标题: [求助]关于文本行与行合并~~ [打印本页]

---

作者: lslindyx     时间: 2009-2-5 13:27    标题: [求助]关于文本行与行合并~~

a.txt和b.txt
2个文本文件中，内容都是一行一行的，然后现在想把2个文件按一行一行的接起来，就是a的第一行接b的第一行，然后以此类推~~~
有人能帮忙吗？？
谢谢啊~~~

---

作者: moniuming     时间: 2009-2-5 14:28
下面的代码用于行数相同的两个文本,如果行数不一样,请作适当更改:
[ Last edited by moniuming on 2009-2-5 at 14:30 ]

---

作者: zhengqian529     时间: 2009-2-5 15:56
我写了一个简单的，贴下代码，但是有一个问题就是，它不能把空格当一行，HAT大哥可以改进下吗？
@echo off&Setlocal EnableDelayedExpansion
REM %0 %*
REM

Set FileOne=%1
Set FileTwo=%2
Set Num1=0
Set Num2=0

for /f "delims=" %%i in (%FileOne%) do (
    Set /a Num1+=1
    for /f "delims=" %%j in (%FileTwo%) do (
        Set /a Num2+=1
        if !Num1!==!Num2! Set var=%%i%%j&&echo !var!>>test.txt
    )
    Set Num2=0
)

for /f "delims=" %%i in (%FileTwo%) do (
    Set /a Num2+=1
    if "!Num1!" LSS "!Num2!" echo %%i>>test.txt
)

Set Num1=0
for /f "delims=" %%i in (%FileOne%) do (
    set /a Num1+=1
    if "!Num1!" GTR "!Num2!" echo %%i>>test.txt
)

Endlocal
Cls&Pause

---

作者: zhengqian529     时间: 2009-2-5 16:33
不好意思，研究了一下，我写了最后一个版本，可以适合以下情况：
1. 两个文件行数不一样
2.两个文件相同的行，某一行为空行
3.两个文件相同的行都为空行

其他的我还不清楚，现在先贴出代码：

REM %0 %*
REM
@echo off&Setlocal EnableDelayedExpansion

Set FileOne=%1
Set FileTwo=%2
Set Num1=0
Set Num2=0

for /f "tokens=1* delims=:" %%i in ('findstr /n .* %FileOne%') do (
    Set /a Num1+=1
    for /f "tokens=1* delims=:" %%a in ('findstr /n .* %FileTwo%') do (
        Set /a Num2+=1
        if !Num1!==!Num2! Set var=%%j%%b&&echo.!var!>>test.txt
    )
    Set Num2=0
)

echo !Num1! !Num2!
for /f "tokens=1* delims=:" %%i in ('findstr /n .* %FileTwo%') do (
    Set /a Num2+=1
    if "!Num1!" LSS "!Num2!" echo.%%j>>test.txt
)

Set Num1=0
echo !Num1! !Num2!
for /f "tokens=1* delims=:" %%i in ('findstr /n .* %FileOne%') do (
    set /a Num1+=1
    echo %%i
    if "!Num1!" GTR "!Num2!" echo.%%j>>test.txt
)

Endlocal
cls&pause

---

作者: netbenton     时间: 2009-2-5 21:01
学习了

[ Last edited by netbenton on 2009-2-5 at 21:10 ]