标题: [文本处理] 如何用批处理或者vbs将文本中分行/断行的同行内容合并/相连接 [打印本页]
作者: buypro 时间: 2014-9-13 11:32 标题: 如何用批处理或者vbs将文本中分行/断行的同行内容合并/相连接
本帖最后由 pcl_test 于 2016-7-29 13:22 编辑
如何用批处理或者vbs将不同行合并???
C盘dir1目录下有N个文件。每个文件格式如下
截至日期:2014-01-15 股东户数:5 在职人员:51
股东名称
-----------------------------------------------------------
特区资产管理委员会办 650.03 1.11
公室
鹤一实业投资公司 231.00 0.40
鹤一科贸易有限公司 210.20 0.36
1
刘昌军 201.28 0.34
张郁 193.39 0.33
-----------------------------------------------------------
-----------------------------------------------------------
特区资产管理委员会办 650.03 1.11
公室2
鹤一实业投资公司 231.00 0.40
鹤一科贸易有限公司 210.20 0.36
司 2
刘昌军 201.28 0.34
张郁 193.39 0.33
-----------------------------------------------------------
作者: buypro 时间: 2014-9-13 11:35
如何将分行的内容合并成一行???并替换分割符为///?
修改过的文件存在C盘的dir2 目录下。文件名不变
截至日期:2014-06-30 股东户数:5 在职人员:51
股东名称
-----------------------------------------------------------
特区资产管理委员会办公室 /// 650.03 /// 1.11
鹤一实业投资公司 /// 231.00 /// 0.40
鹤一科贸易有限公司1 /// 210.20 /// 0.36
刘昌军 /// 201.28 /// 0.34
张郁 /// 193.39 /// 0.33
-----------------------------------------------------------
-----------------------------------------------------------
特区资产管理委员会办公室2 /// 650.03 /// 1.11
鹤一实业投资公司 /// 231.00 /// 0.40
鹤一科贸易有限公司司 2 /// 210.20 /// 0.36
刘昌军 /// 201.28 /// 0.34
张郁 /// 193.39 /// 0.33
-----------------------------------------------------------
谢谢
作者: buypro 时间: 2014-9-20 13:18
[code][/code]
作者: CrLf 时间: 2014-9-20 15:30
- @set @n=0/*&echo off
- for %%a in (c:\dir\*.csv) do (
- cscript -nologo -e:jscript %0 <%%a >$
- move /y $ "%%a"
- )
- pause&exit /b */
-
- var text
- text = WScript.StdIn.ReadAll()
- text = text.replace(/(.+?)( +\d+\.\d+ +\d+\.\d+.*\r\n)(\S+) *\r\n/g,'$1$3$2')
- text = text.replace(/ +(?=\S)/g,' /// ')
- WScript.Echo(text)
复制代码
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |