精易论坛

标题: 取中间文本问题，取不到是啥原因呢 [打印本页]

作者: a896989093 时间: 2021-7-10 12:43
标题: 取中间文本问题，取不到是啥原因呢

代码.zip (1.39 MB, 下载次数: 6)

我想取这个网页的文本到超极列表框，怎么添加到超级列表框不成功呢。是哪有问题么，大神帮看看。。还有取的汉字怎么是乱码呢

.版本 2
.支持库 iext

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

.子程序 _按钮1_被单击
.局部变量网页内容, 文本型
.局部变量返回内容数组, 文本型, , "0"
.局部变量临时_索引, 整数型
.局部变量 a, 类_json
.局部变量标题1, 文本型
.局部变量 b, 整数型
.局部变量 i, 整数型

网页内容＝到文本 (网页_访问 (“https://fundgz.1234567.com.cn/js/005827.js”, ))

编辑框2.内容＝网页内容
a.解析 (编辑框2.内容)
' 标题1 ＝ a.取通用属性 (“aaData[0].id”, )
.计次循环首 (a.成员数 (), i)
b ＝超级列表框1.插入表项 (, , , , , )
超级列表框1.置标题 (b, 0, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].fundcode”, ))
超级列表框1.置标题 (b, 1, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].name”, ))
超级列表框1.置标题 (b, 2, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].dwjz”, ))
超级列表框1.置标题 (b, 3, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].gsz”, ))

超级列表框1.置标题 (b, 4, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].gszzl”, ))
' 超级列表框1.置标题 (b, 5, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].nownum”, ))
' 超级列表框1.置标题 (b, 6, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].endnum”, ))
' 超级列表框1.置标题 (b, 7, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].time”, ))
' 超级列表框1.置标题 (b, 8, a.取通用属性 (“jsonpgz[” ＋到文本 (i － 1) ＋ “].orderstate”, ))
.计次循环尾 ()

a.清除 ()

' jsonpgz({"fundcode":"005827","name":"鏄撴柟杈捐摑绛圭簿閫夋贩鍚?,"jzrq":"2021-07-08","dwjz":"2.8359","gsz":"2.8294","gszzl":"-0.23","gztime":"2021-07-09 15:00"});

作者: 追风少年卡拉赞 时间: 2021-7-10 12:43
这样试试呢

基金.e

724.32 KB, 下载次数: 5

作者: knowledge 时间: 2021-7-10 12:58
大致如此~~~~~~~~~~~~

基金.e

724.36 KB, 下载次数: 2

作者: 元老 时间: 2021-7-10 13:05

基金.e (959.04 KB, 下载次数: 2)

欢迎光临精易论坛 (https://125.confly.eu.org/)