求助，查找文本里的匹配项，将匹配项输出 - DOS批处理 & 脚本技术（批处理室） - 中国DOS联盟论坛

作者:

标题: 求助，查找文本里的匹配项，将匹配项输出

crazyeva
新手上路

积分 3
发帖 3
注册 2010-10-30
状态离线

『楼主』: 求助，查找文本里的匹配项，将匹配项输出

比如我想从文件中提取1234.12.1.0008 和 0.0.0.0这两项文件内容： abc1234.12.1.0008 1 1.1.1.1 1.0 a.b.c.d 1.2.3.4 12 0.0.0.0abc 其实就是从每行中提取第一个长得像ip地址的一串字符，把它列出来求教各位老大这应该怎么做？

2010-11-1 12:23

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

WANKOILZ
初级用户

积分 198
发帖 89
注册 2007-9-6
来自重庆
状态离线

『第 2 楼』:

vbs: 假设文本名为a.txt

set FSO=createobject("scripting.filesystemobject")
set R=New RegExp
R.pattern="\d+\.\d+\.\d+\.\d+"
R.Ignorecase=true
R.Global=true
R.Multiline=true
str=FSO.opentextfile("a.txt").readall()
set Matches=R.execute(str)
set F=FSO.createtextfile("b.txt",2)
For each Match in Matches
    F.writeline(Match)
Next
F.close

2010-11-1 13:56

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

crazyeva
新手上路

积分 3
发帖 3
注册 2010-10-30
状态离线

『第 3 楼』:

Originally posted by WANKOILZ at 2010-11-1 13:56: vbs: 假设文本名为a.txt [code]set FSO=createobject("scripting.filesystemobject") set R=New RegExp R.pattern="\d+\.\d+\.\d+\.\d+" R.Ignorecase=true R.Global=true R.Mu ...

先谢了，尝试中 [ Last edited by crazyeva on 2010-11-1 at 22:41 ]

2010-11-1 22:36

查看资料发送邮件发短消息网志

编辑帖子回复引用回复

crazyeva
新手上路

积分 3
发帖 3
注册 2010-10-30
状态离线

『第 4 楼』:

啊哦...再弱弱的问下想问下能用批处理文件的形式实现吗？

2010-11-1 22:39

查看资料发送邮件发短消息网志

编辑帖子回复引用回复