VB正则式 提取字符串(200分)

[复制链接]
查看11 | 回复4 | 2008-8-29 10:06:57 | 显示全部楼层 |阅读模式
href="http://bbs1.people.com.cn/postDetail.do?boardId=19&view=1&id=25788935"egergegfgd
href="http://bbs1.people.com.cn/postDetail.do?boardId=19&view=1&id=82055382"rgergergdd
href="http://bbs1.people.com.cn/postDetail.do?boardId=19&view=1&id=88080241"ggdfgdr"
上面是目标字符串
可以在里面选取一个相同点postDetail.do
然后进行提取结果如下:
http://bbs1.people.com.cn/postDetail.do?boardId=19&view=1&id=25788935
http://bbs1.people.com.cn/postDetail.do?boardId=19&view=1&id=82055382
http://bbs1.people.com.cn/postDetail.do?boardId=19&view=1&id=88080241
请兄弟利用相同点来写 正则式(相同点可以变换成postDetail.do?boar这样也能提取)
能够运行成功的代码优先追加100分
给出能运行的代码啊,马上加分!!!!!!!!
字符串要是 是这样
href="http://bbs1.people.com.cn/feggergergrg"
href="http://bbs1.people.com.cn/postDetail.do?boardId=19&;view=1&id=25788935"egergegfgd
href="http://bbs1.people.com.cn/postDetail.do?boardId=19&;view=1&id=82055382"rgergergdd
href="http://bbs1.people.com.cn/postDetail.do?boardId=19&;view=1&id=88080241"ggdfgdr"
href="http://bbs1.people.com.cn/feetwetwtrgrg.wetwetwt"
3搂的就不行了 有那么简单我还不会吗?我要正则式要用相同点!!!!!!

回复

使用道具 举报

千问 | 2008-8-29 10:06:57 | 显示全部楼层
先在工程里面引用 Microsoft VBScript Regular Expressions 5.5代码如下Option ExplicitPrivate Sub Form_Load()Dim objRegExp As regexpDim objMatch As MatchDim colMatches As MatchCollec...
回复

使用道具 举报

千问 | 2008-8-29 10:06:57 | 显示全部楼层
那可以用捕获 我不知道你用的VB引擎是否支持捕获 或者支持匿名捕获 或者命名捕获 不同的引擎实现不一样 使用捕获可以捕获前面相同的字符串 然后用反向引用或者说向前引用引用捕获组 这个也是根据实现写法不同...
回复

使用道具 举报

千问 | 2008-8-29 10:06:57 | 显示全部楼层
s="href=""http://bbs1.people.com.cn/postDetail.do?boardId=19&;view=1&id=25788935""egergegfgd" Dim reSet re = CreateObject("VBScript.RegExp")re.Global = Truere.Pattern = """...
回复

使用道具 举报

千问 | 2008-8-29 10:06:57 | 显示全部楼层
这还不容易...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行