正则求助

100102873 · 发表于 2013-6-2 12:26:25

<a href="http://bbs.xxx.com/thread-3288903-1-1.html" onclick="atarget(this)" class="xst" >奢侈品</a>

要取出链接和标题

iphone · 发表于 2013-6-2 12:26:26

[e]
.版本 2

.子程序正则_匹配批量, 整数型, , 本子程序采用【精易编程助手】生成。成功返回匹配的数量，失败返回0。
.参数源文本, 文本型, , 欲被匹配的文本
.局部变量局_正则, 正则表达式类, , , 此类为精易模块里面的正则类，精易模块下载地址：www.3600gz.cn/thread-1177-1-1.html
.局部变量局_匹配数, 整数型
.局部变量局_计次, 整数型

.如果真 (局_正则.创建 (“href *= *['#引号]*(\S+)[#引号']”, 源文本, 假, 假, 真,真) ＝假)
信息框 (“正则创建失败，请检查正则表达式语句是否有误！”, #错误图标, )
返回 (0)
.如果真结束
局_匹配数＝局_正则.取匹配数量 ()
.如果真 (局_匹配数＝ 0)
信息框 (“匹配失败，请检检查正则语句是否有误，数量：0”, #错误图标, )
返回 (0)
.如果真结束
.计次循环首 (局_匹配数, 局_计次)
输出调试文本 (“匹配文本 ” ＋到文本 (局_计次) ＋ “ 中的子匹配文本 1：” ＋局_正则.取子匹配文本 (局_计次, 1))
.计次循环尾 ()
返回 (局_匹配数)[/e]