lsszmj 发表于 2012-8-15 19:55:51

求助：http://地址正则获取（已解决）

本帖最后由 lsszmj 于 2012-8-15 21:45 编辑

代码如下：
#include <Array.au3>
Local $Str = _
                'http://www.baidu.com/index.php?tn=site888_pg' & @CRLF & @CRLF & _
                'http://www.126185.com/12456/sdsoft/NOD32/nod32_id.htm' & @CRLF & @CRLF & _
                'http://blog.sohu.com/people/22444/12378.html'
MsgBox(0, '原字符串', $Str)
Local $Test = StringRegExp($str, '[?:http\:\/\/]([^\/]+\/.*)', 3)
If Not @Error Then MsgBox(0, '匹配数量: ' & UBound($Test), '其中元素为: ' & $Test)
_ArrayDisplay($Test, UBound($Test))
这是我自己折腾的正则，现状为：
ttp://www.nod32fan.com/nod32jihuoma/
ttp://www.126185.com/killsoftware/sdsoft/NOD32/nod32_id.htm
[2 ttp://blog.sohu.com/people/ff2006/199352712.html
我想要的：
http://www.nod32fan.com/nod32jihuoma/
http://www.126185.com/killsoftware/sdsoft/NOD32/nod32_id.htm
[2 http://blog.sohu.com/people/ff2006/199352712.html
真诚求助各位大大帮助

afan 发表于 2012-8-15 21:15:25

(?i)http:\V+

lsszmj 发表于 2012-8-15 21:44:55

回复 2# afan
谢谢A版，问题完美解决

ajian55 发表于 2012-8-15 22:43:31

A版的正则表达式莫不为完美的解决方法，但是楼主自己写的，虽然匹配到的结果到的少了个h, 自己加上不就行了么？

bsjd120 发表于 2012-12-25 14:55:40

学习了啊 ，非常需要哦 。。。
页: [1]
查看完整版本: 求助：http://地址正则获取（已解决）