我也来一份肺炎的

塔利班的蛋糕 · 发表于 2020-1-27 21:42:41

本帖最后由塔利班的蛋糕于 2020-1-27 21:44 编辑

滚动消息和统计xx来自https://view.inews.qq.com/g2/get ... 023614574927234444_，
列表框的xx来自http://m.medsci.cn/wh.asp
调用精益模块

肺炎实时监测.e (632.25 KB, 下载次数: 146)

陈述哦 · 发表于 2020-2-10 05:35:07

666666666666666

初学者1 · 发表于 2020-1-31 16:10:12

感谢楼主66666

飞跃团队 · 发表于 2020-1-28 19:18:47

3Q6666666666

郝志朋 · 发表于 2020-1-28 16:27:23

学习一下json处理

wojiaoa3 · 发表于 2020-1-28 15:13:56

.版本 2
.支持库 iext

.程序集窗口程序集_启动窗口

.子程序 __启动窗口_创建完毕
.局部变量解码xx, 文本型
.局部变量筛选, 正则表达式类
.局部变量局_计数, 整数型
.局部变量索引, 整数型

编码_UTF8解码 (网页_访问_对象 (“http://m.medsci.cn/wh.asp”, 0, , , , , , , , , , , , , , , , , ), 解码xx)
筛选.创建 (#匹配正则, 解码xx, , , , )
.计次循环首 (筛选.取匹配数量 (), 局_计数)
索引＝超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (索引, 0, 筛选.取子匹配文本 (局_计数, 1, ))
超级列表框1.置标题 (索引, 1, 筛选.取子匹配文本 (局_计数, 2, ))
超级列表框1.置标题 (索引, 2, 筛选.取子匹配文本 (局_计数, 3, ))
超级列表框1.置标题 (索引, 3, 筛选.取子匹配文本 (局_计数, 4, ))
超级列表框1.置标题 (索引, 4, 筛选.取子匹配文本 (局_计数, 5, ))
超级列表框1.置标题 (索引, 5, 筛选.取子匹配文本 (局_计数, 6, ))
.计次循环尾 ()

下面是正则
<tr style="border-left:1px solid #F00;border-top:1px solid black"><td style="border: 1px solid black;">(.*?)</td><td style="border: 1px solid black;">(.*?)</td><td style="border: 1px solid black;">(.*?)</td><td style="border: 1px solid black;">(.*?)</td><td style="border: 1px solid black;">(.*?)</td><td style="border: 1px solid black;">(.*?)</td></tr>

灵海雪缘 · 发表于 2020-1-28 13:20:05

不错，学习了！！

土豆W · 发表于 2020-1-28 06:55:55

感谢楼主66666

土豆W · 发表于 2020-1-28 06:55:33

感谢楼主6666

yxl2008 · 发表于 2020-1-28 03:05:58

谢谢楼主分享，下载学习！！！！

		自动登录	找回密码
密码			注册

[易源码分享] 我也来一份肺炎的

评分