有个影视网站正则对。源码对。为什么取不出来 帮我看下大神在不在

z781140182

http://www.btzx2017.com/videos/2/page/1

就是这个网站


事件 窗口1.创建完毕()
        页数 = 页数 + 1
        多线程1.开始取网页源码("http://www.btzx2017.com/videos/2/page/1","utf-8")
        显示进度对话框("正在加载影片   "& 子文本替换(到文本(页数),".0",""))
结束 事件

事件 多线程1.取网页源码完毕(源码 为 文本型)
        变量 表达式 为 文本型
        变量 子匹配索引 为 整数型
        变量 子匹配数量 为 整数型
        变量 结果 为 文本型
        变量 匹配索引 为 整数型
        变量 正则对象 为 QIQI_正则类
        源码 = 子文本替换(源码," ","")
        表达式 = "<ahref=\"(.*?)\"title=\"(.*?)\">\r\n<imgsrc=\"(.*?)\">\r\n</a>\r\n</div>\r\n<divclass='points'>\r\n<span>(.*?)</span>\r\n<p><ahref=\"(.*?)\"title=\"(.*?)</a></p>"
        正则对象 = 创建 QIQI_正则类
        匹配索引=0
        正则对象.创建表达式(表达式,假,真)
        正则对象.开始匹配(源码)
        判断循环首 正则对象.匹配下一个()
                匹配索引 = 匹配索引 + 1
                高级列表框1.添加项目(正则对象.取子匹配文本(3),正则对象.取子匹配文本(2),正则对象.取子匹配文本(1),"","")
        判断循环尾
        关闭进度对话框()
结束 事件

易如意

正则表达式来自萌新助手：https://www.eruyi.cn/thread-2319-1-1.html
使用萌新助手一键粘贴复制稍微修改一下就可以了
源码给你试试看： ag美剧.e4a (25.81 KB, 下载次数: 125)

2018-9-17 19:09 上传

点击文件名下载附件

jeslin

这个资源站不错
~~~~~~~~~~

sqdwvf

RE: 有个影视网站正则对。源码对。为什么取不出来 帮我看下大神在不在 [修改]