标题: 求助:文本内容如何依次换行? [打印本页]
作者: sweiwei 时间: 2007-8-16 15:07 标题: 求助:文本内容如何依次换行?
如下格式的文本如何用P或vbs脚本改成后面的格式.?
卡号: 100146802
密码: 994237921-647954204
卡号: 100146803
密码: 900166321-273333596
卡号: 100146804
密码: 218600319-522651020
卡号: 100146805
密码: 170201040-226103880
卡号: 100146806
密码: 550326758-726127695
改为:
100146802,994237921,647954204
100146803,900166321,273333596
100146804,218600319,522651020
100146805,170201040,226103880
100146806,550326758,726127695
作者: ansipeter 时间: 2007-8-16 16:00
@echo off&setlocal
for /f "tokens=2,3 delims=-: " %%a in (1.txt) do (
call:ansipeter %%a %%b
)
goto:eof
:ansipeter
if "%2" NEQ "" (set/p=%1,%2<nul&echo.) else (set/p=%1,<nul)
goto :eof
for /f "tokens=2,3 delims=-: " %%a in (1.txt) do (
call:ansipeter %%a %%b
)
goto:eof
:ansipeter
if "%2" NEQ "" (set/p=%1,%2<nul&echo.) else (set/p=%1,<nul)
goto :eof
作者: ccwan 时间: 2007-8-16 16:10
楼上代码比我的简洁啊
[ Last edited by ccwan on 2007-8-16 at 04:12 PM ]
作者: vkill 时间: 2007-8-16 16:36
sed "N;s/\n/-/;s/[^-0-9]//g;s/-/,/g" c.txt
写的很长觉得
作者: yovie 时间: 2007-8-16 17:04
呵呵，2楼写得很简洁。可惜我只能加1分~~~，另外，赞一下4楼的。
sed我实在不会用，仰慕一下。
作者: akxiang 时间: 2007-8-16 18:08
高手这么多!!!!
作者: sweiwei 时间: 2007-8-17 10:55
谢谢各位大大.