批处理如何合并逻辑上属于同行的内容？

buypro99 · 发表于 2015-9-4 16:34:40

这个问题困惑了好久了。一直没想到好的解决方法。
文本文件内容如下，可能有N行，举例4行。如果地址分行的话
则分行内容都紧挨着地址的第一行，地址第二行也规律性的有分隔符

地址1 第一行｜ 111｜ 111-2｜ 111-3
地址1第二行｜       ｜       ｜

地址2第一行｜ 222｜ 222-2｜ 222-3
地址3第一行｜ 333｜ 333-2｜ 333-3
地址3第二行｜       ｜       ｜

地址4 第一行｜ 444｜ 444-2｜ 444-3

如何通过批处理或者vbs将分成两行的一个记录合并成在一行里

效果如下

地址1 地址1第二行  ｜ 111｜ 111-2｜ 111-3
地址2 ｜ 222｜ 222-2｜ 222-3
地址3地址3第二行｜ 333｜ 333-2｜ 333-3
地址4 ｜ 444｜ 444-2｜ 444-3

谁能提供一下思路。
谢谢

回家路上 · 发表于 2015-9-4 17:09:47

如果不好描述描述不清楚，建议上部分附件或截图。

buypro99 · 发表于 2015-9-4 17:49:05

好的

附上图和附件

buypro99 · 发表于 2015-9-4 17:51:00

附件如下

路过 · 发表于 2015-9-4 18:37:25

@echo off
setlocal enabledelayedexpansion
set d=0
for /f "tokens=*" %%a in (test.txt) do (
if not defined r0 (set r0=%%a)
set p=%%a
set k=f
set q=!p: =!
if "!q:｜｜=!" neq "!q!" (
for /f %%b in ('echo;%%a') do (
set/a e=!d!-1
call set t=%%r!e!%%
for /f %%c in ('echo;!t!') do (
set r!e!=%%c%%b!t:%%c=!
)
set k=y
)
)
if "!k!"=="f" (
set r!d!=%%a
set /a d+=1
)
)
for /l %%a in (0,1,!d!) do (echo;!r%%a!>>Result.txt)
pause

复制代码

试一试

回家路上 · 发表于 2015-9-4 21:54:06

@echo off & setlocal enabledelayedexpansion
(for /f "tokens=1* delims= " %%i in ('type test.txt') do (
set line=%%j
set line=!line: =!
if "!line:｜｜=!" equ "!line!" (
if defined adr (
echo;!adr! !num!
)
set adr=%%i&set num=%%j
)else (
set adr=!adr!%%i
)
)
echo;!adr! !num!
)>结果.txt
pause & exit /b

复制代码

buypro99 · 发表于 2015-9-5 20:45:53

谢谢楼上两位老师

测试了一下果然可以
不过如果在地址中含有空格的话。合并后的地址顺序是错的

能否考虑空格问题？

比如test1.txt的情况

buypro99 · 发表于 2015-9-5 20:58:43

圈1的记录含有空格，合并后地址顺序错了

圈2的记录也含有空格，合并后地址的最后部分丢失了。

回家路上 · 发表于 2015-9-5 21:20:42

本帖最后由回家路上于 2015-9-6 09:42 编辑

回复 8# buypro99

@echo off & setlocal enabledelayedexpansion
(for /f "delims=" %%i in ('type test1.txt') do (
set line=%%i
set line=!line: =!
if "!line:｜｜=!" equ "!line!" (
if defined adr echo;!adr! !num!
set num=｜!line:*｜=!
for /f "delims=" %%a in ("!num!") do set adr=!line:%%a=!
)else (
if "!line!" neq "" (
set n=｜!line:*｜=!
for /f "delims=" %%a in ("!n!") do set adr=!adr!!line:%%a=!
)
)
)
echo;!adr! !num!
)>结果.txt
pause & exit /b

复制代码

pcl_test · 发表于 2015-9-6 00:15:37

本帖最后由 pcl_test 于 2015-9-6 00:21 编辑

样本不足，并不能考虑全部的情况，最好打包上传原件

@if(0)==(0) echo off&cscript -nologo -e:jscript "%~f0"<"test1.txt"&pause & exit/b@end
var t1=t2='';
var arr = WScript.StdIn.ReadAll().split(/\s*\r?\n/);
arr.push('#');
for (var i=0;i<arr.length;i++){
if (def==0&&!/｜\s+｜+/.test(arr[i])){
WSH.Echo(t1.replace(/\s+/g,'')+' '+t2.replace(/｜[\s｜]*$/,''));
def=1;t1=t2='';
}
var str1 = arr[i].replace(/｜.+$/g,'');
var str2 = arr[i].replace(/^[^｜]+/,'');
t1 += str1;t2 += str2;var def=0;
}

复制代码

buypro99 · 发表于 2015-9-6 08:30:48

回家路上你好

谢谢你的改写
你测试成功吗？
我本地测试后合并的顺序问题解决了

但是最后一个记录整条都丢失了。
N个记录的话。第n个记录整条都丢失

回家路上 · 发表于 2015-9-6 09:43:32

回复 11# buypro99

已修改。
其实对比我的两个，就会发现，第二个倒数第几行少了一行

echo;!adr! !num!

复制代码

		自动登录	找回密码
密码			注册

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

[文本处理] 批处理如何合并逻辑上属于同行的内容？