中国DOS联盟论坛

中国DOS联盟

-- 联合DOS 推动DOS 发展DOS --
联盟域名:www.cn-dos.net 论坛域名:www.cn-dos.net/forum
游客 | 登录 | 注册 | 会员 | 搜索 | 中国DOS联盟
中国DOS联盟论坛
现在时间是 2026-08-11 06:51
47,811 主题排行 / 349,897 发帖 / 今日 0 篇 / 48,256 会员排行
DOS批处理 & 脚本技术(批处理室) » [求助]关于文本行与行合并~~
可打印版本  791 / 4
第1楼 lslindyx 发表于 2009-02-05 13:27
新手上路 发帖 1 积分 1
[求助]关于文本行与行合并~~
a.txt和b.txt
2个文本文件中,内容都是一行一行的,然后现在想把2个文件按一行一行的接起来,就是a的第一行接b的第一行,然后以此类推~~~
有人能帮忙吗??
谢谢啊~~~
第2楼 moniuming 发表于 2009-02-05 14:28
银牌会员 发帖 574 积分 1,335 来自 广西
下面的代码用于行数相同的两个文本,如果行数不一样,请作适当更改:


[ Last edited by moniuming on 2009-2-5 at 14:30 ]
第3楼 zhengqian529 发表于 2009-02-05 15:56
初级用户 发帖 93 积分 100 来自 湖南
我写了一个简单的,贴下代码,但是有一个问题就是,它不能把空格当一行,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
第4楼 zhengqian529 发表于 2009-02-05 16:33
初级用户 发帖 93 积分 100 来自 湖南
不好意思,研究了一下,我写了最后一个版本,可以适合以下情况:
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
第5楼 netbenton 发表于 2009-02-05 21:01
银牌会员 发帖 752 积分 1,916 来自 广西
学习了

[ Last edited by netbenton on 2009-2-5 at 21:10 ]
[ 联系联盟系统管理团队 - 中国DOS联盟 - 标准版 ]
Sponsored by ifanr Inc | © 2001–2023