磁力搜索工具源码可取分页附皮肤模块

易语言 2019-10-13 17:56:10

磁力搜索工具源码可取分页附皮肤模块

临时源码 = 网页_访问S (“……………………” + 编辑框_搜索框.内容 + “&p=” + 到文本 (页数))
当前页数 = 到数值 (文本_取出中间文本 (临时源码, “startPage:”, “,”))
透明标签1.标题 = “当前第” + 到文本 (当前页数) + “页”
.如果真 (页数 = 1)
总页数 = 到数值 (文本_取出中间文本 (临时源码, “totalPages:”, “,”))
输出调试文本 (总页数)
.计次循环首 (总页数, 计次)
组合框_页数.加入项目 (到文本 (计次), )
.计次循环尾 ()
.如果真结束
超级列表框1.全部删除 ()
正则.创建 (#BT樱桃, 临时源码, )
.计次循环首 (正则.取匹配数量 (), 计次)
临时表项 = 超级列表框1.插入表项 (, 到文本 (超级列表框1.取表项数 () + 1), , , , )
超级列表框1.置标题 (临时表项, 1, 正则.取子匹配文本 (计次, 4))
超级列表框1.置标题 (临时表项, 2, 正则.取子匹配文本 (计次, 5))
超级列表框1.置标题 (临时表项, 3, 正则.取子匹配文本 (计次, 2))
超级列表框1.置标题 (临时表项, 4, 正则.取子匹配文本 (计次, 1))
超级列表框1.置标题 (临时表项, 5, 正则.取子匹配文本 (计次, 3))
处理事件 ()
.计次循环尾 ()