[文本处理] BAT怎么有选择性的替换掉一个txt文本文件行末的回车换行符？

jzp820927

有一个txt的文本文件，里面的内容如下：

　　1、中国**党党员是______中的有**主义觉悟的先锋战士。（B）
　　A、农民阶级   B、中国工人阶级    C、知识分子
　　2、“**”重要思想，是我们党的______。（C）
　　A、立国之本、执政之基、力量之源    B、立党之本、强国之基、力量之源  
　　C、立党之本、执政之基、力量之源
　　3、中国**党以_______作为自己的行为指南。（C）
　　A、马克思列宁主义、**思想
　　B、**建设有中国特色社会主义理论
　　C、马克思列宁主义、**思想、**理论和”**”重要思想

现在要把题目和答案合成一行，如下所示

　　1、中国**党党员是______中的有**主义觉悟的先锋战士。（B）A、农民阶级   B、中国工人阶级    C、知识分子
　　2、“**”重要思想，是我们党的______。（C）A、立国之本、执政之基、力量之源    B、立党之本、强国之基、力量之源  C、立党之本、执政之基、力量之源
　　3、中国**党以_______作为自己的行为指南。（C）A、马克思列宁主义、**思想B、**建设有中国特色社会主义理论C、马克思列宁主义、**思想、**理论和”**”重要思想

请问怎么用批处理来做成这个效果呢？

jzp820927

前面确实有2个全角空格，因为这个txt文件是用word文件另存的，好像word文件是排版了的，段首缩进2个字符，但是这2个空格应该对处理这个文本文件影响不大吧？

还想问个问题，就怎么把

　　1、中国**党党员是______中的有**主义觉悟的先锋战士。（B）A、农民阶级   B、中国工人阶级    C、知识分子
　　2、“**”重要思想，是我们党的______。（C）A、立国之本、执政之基、力量之源    B、立党之本、强国之基、力量之源  C、立党之本、执政之基、力量之源
　　3、中国**党以_______作为自己的行为指南。（C）A、马克思列宁主义、**思想B、**建设有中国特色社会主义理论C、马克思列宁主义、**思想、**理论和”**”重要思想

这个结果里面的每个题里面的（）中的字母提取出来，放在题目最后，用逗号分割，而且把题名里面的括号里面的字母去掉，结果像下面这样：

　　1、中国**党党员是______中的有**主义觉悟的先锋战士。（）A、农民阶级   B、中国工人阶级    C、知识分子,B
　　2、“**”重要思想，是我们党的______。（）A、立国之本、执政之基、力量之源    B、立党之本、强国之基、力量之源  C、立党之本、执政之基、力量之源,C
　　3、中国**党以_______作为自己的行为指南。（）A、马克思列宁主义、**思想B、**建设有中国特色社会主义理论C、马克思列宁主义、**思想、**理论和”**”重要思想,C

apang

保存为test.vbs，试试
每行开头是不是有全角空格？

Set fso = CreateObject("Scripting.FileSystemObject")
text = fso.OpenTextFile("a.txt").ReadAll
Set re = New RegExp
re.Pattern = "([　\s]*\d+、.*?)（([a-z])）\r\n(([　\s]*[a-z]、.*(?:$|\r\n))+)"
re.Global = True
re.IgnoreCase = True
For Each a In re.Execute(text)
    str = Replace(Replace(a.SubMatches(2),vbCrLf," "),"　","")
    str = a.SubMatches(0) & "（）" & str & "," & a.SubMatches(1)
    fso.OpenTextFile("b.txt",8,True).WriteLine str
Next
MsgBox "OK"
复制代码

foxJL

来个纯P的.

@echo off&setlocal enabledelayedexpansion
set n=123456789
for /f "tokens=* delims=　" %%i in (a.txt) do (
	set str=%%i&set str=!str:~0,1!&call set st=%%n:!str!=%%
	if not !st! equ !n! (set/a s+=1&set str!s!=%%i)
	if !st! equ !n! (call set str!s!=%%str!s!%%   %%i)
)
for /l %%i in (1,1,!s!) do (echo,!str%%i!>>b.txt)
pause
复制代码

jzp820927

非常感谢，我测试看看效果

tmplinshi

fr "abc.txt" -r:"[\r\n]+\s*([A-Z]、)" -t:"\1"
复制代码

fr 下载地址: http://baiy.cn/utils/fr/index.htm

测试前请备份文件。