有个影视网站正则对。源码对。为什么取不出来 帮我看下大神在不在
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
使用萌新助手一键粘贴复制稍微修改一下就可以了
源码给你试试看:
这个资源站不错
~~~~~~~~~~ RE: 有个影视网站正则对。源码对。为什么取不出来 帮我看下大神在不在 [修改]
页:
[1]