请教正则采集网页数据。有空的大神进来看看

jin889 · 发表于 2017-9-7 17:02:39

想从网站上采集数据到超级列表框，但是我写的运行不了，不知道什么原因，请大神指教，给个源码学习下。另外要是能改进成自动采集的更好，不用通过按钮来实现的。下面附上我下的源码和网站。
http://kj.13322.com/ssc_cqssc_BaseTrend_30_sY.html

当然是原谅她啊 · 发表于 2017-9-7 17:02:40

加了点注释，新数据不覆盖之前的数据

易正易则 · 发表于 2017-9-7 17:32:18

123.e (646.46 KB, 下载次数: 14)

原子 · 发表于 2017-9-7 17:33:50

.版本 2
.支持库 iext
.程序集窗口程序集_启动窗口
.程序集变量线程, 线程许可证
.子程序 _按钮1_被单击
线程_启动 (&子程序1)
.子程序子程序1
.局部变量临时文本, 文本型
.局部变量正则, 正则表达式类
.局部变量 i, 整数型
.局部变量临时表项, 整数型
线程_进入许可区 (线程)
临时文本＝网页_访问S (“http://kj.13322.com/ssc_cqssc_BaseTrend_30_sY.html”)
正则.创建 (#常量2, 临时文本, )
.计次循环首 (正则.取匹配数量 (), i)
临时表项＝超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (临时表项, 0, 正则.取子匹配文本 (i, 1))
超级列表框1.置标题 (临时表项, 1, 正则.取子匹配文本 (i, 2))
处理事件 ()
.计次循环尾 ()
线程_退出许可区 (线程)
.子程序 __启动窗口_创建完毕, , , x
线程＝线程_创建许可证 ()

原子 · 发表于 2017-9-7 17:34:16

正则.e (636.85 KB, 下载次数: 6)

jin889 · 发表于 2017-9-7 17:50:16

Qc鬼帝发表于 2017-9-7 17:34

你好，要是让他每次自动采集网页上新的数据要怎么写代码呢？

易正易则 · 发表于 2017-9-7 17:55:16

给你改了一下，自动获取

有新数据自动获取.e (646.97 KB, 下载次数: 12)

jin889 · 发表于 2017-9-7 18:08:01

易正易则发表于 2017-9-7 17:55
给你改了一下，自动获取

运行卡死什么原因呢？

易正易则 · 发表于 2017-9-7 18:29:11

jin889 发表于 2017-9-7 18:08
运行卡死什么原因呢？

再试试

有新数据自动获取.e (647.08 KB, 下载次数: 19)

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

[已解决] 请教正则采集网页数据。有空的大神进来看看

最佳答案

评分

浏览过的版块