获取网站内容求解。

badcwytga · 发表于 2012-10-27 00:52:39

马上加入TC

您需要登录才可以下载或查看，没有帐号？立即注册

x

功能逻辑型按钮1_点击()
字符型读取=网络.url读内容("http://www.muceshi.ys168.com/")
字符型[] 返回值,返回值1
如果(读取!="")
编辑框.设置文本("编辑框31",读取)
否则
辅助.消息框("读取失败请联系作者")
如果结束
字符型内容=编辑框.获得文本("编辑框31")
字符串.分割(内容,"在线：",返回值)
字符串.分割(返回值[1],"目录列表",返回值1)
编辑框.设置文本("编辑框35",返回值1[0])

我想获取
http://www.muceshi.ys168.com/
这个网盘里的在线人数

cylhb · 发表于 2012-10-27 01:03:20

功能逻辑型按钮1_点击()
字符型读取=网络.url读内容("http://www.muceshi.ys168.com/",6)
字符型[] 返回值,返回值1
如果(读取!="")
编辑框.设置文本("编辑框0",读取)
否则
辅助.消息框("读取失败请联系作者")
如果结束
字符型内容=编辑框.获得文本("编辑框0")
字符串.分割(内容,"在线:",返回值)

编辑框.设置文本("编辑框1",字符串.截取(返回值[1],41,字符串.查找字符串(返回值[1],"</label>人")))

返回真
功能结束

418958500 · 发表于 2012-10-27 01:49:25

字符串.分割(返回值[1],"目录列表",返回值1)
这里是：
字符串.分割(返回值[0],"目录列表",返回值1)
吧？

418958500 · 发表于 2012-10-27 01:55:36

我自己的：测试过了！

字符型获取=网络.url读内容("http://www.muceshi.ys168.com",6)
如果 (获取=="")
辅助.消息框("读取失败请联系作者")
否则
字符型人数=字符串.截取(获取,字符串.查找字符串(获取,"在线:<label id=\"zxrsts\" style=\"color:yellow;\">")+字符串.长度("在线:<label id=\"zxrsts\" style=\"color:yellow;\">"),字符串.查找字符串(获取,"</label>人"))
编辑框.设置文本("编辑框1",人数)
如果结束

复制代码

badcwytga · 发表于 2012-10-29 19:20:45

回复 4楼418958500的帖子

怎么获取到的`都是0 ？

418958500 · 发表于 2012-10-29 20:51:30

因为人数是0

418958500 · 发表于 2012-10-29 20:53:15

回复 5楼badcwytga的帖子

如果你想实时监控，那就要做个无限循环线程，定时执行以上代码

badcwytga · 发表于 2012-10-29 20:58:33

回复 7楼418958500的帖子

你QQ多少？

418958500 · 发表于 2012-10-29 20:59:28

回复 8楼badcwytga的帖子

= = 不给老是被人骚扰

badcwytga · 发表于 2012-10-29 21:04:24

回复 9楼418958500的帖子

现在网盘的在线人数是2

但是获取了·还是0 不信你试试

帐号		自动登录	找回密码
密码			立即注册

[问题] 获取网站内容求解。

马上加入TC

站长推荐 /2

[问题] 获取网站内容 求解。

马上加入TC

站长推荐 /2

[问题] 获取网站内容求解。