ExcelHome技术论坛

 找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

搜索
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 Excel Home精品图文教程库
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
300集Office 2010微视频教程 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
楼主: Kaohsing

[讨论] 解析网页源码,获得所需数据。

  [复制链接]

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-4 08:10 | 显示全部楼层
6w条tx在线人数
tx在线人数.rar (967.13 KB, 下载次数: 33)

TA的精华主题

TA的得分主题

发表于 2018-10-22 19:19 | 显示全部楼层

Kaohsing老师,帮忙看看这个网页:http://data.eastmoney.com/stock/lhb/yyb/80035742.html 的数据源(营业部交易明细)在哪里,谢谢!

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-10-23 07:49 | 显示全部楼层

TA的精华主题

TA的得分主题

发表于 2018-11-14 10:26 | 显示全部楼层
确实是好东西,真实网抓,学习并收藏

TA的精华主题

TA的得分主题

发表于 2018-11-15 16:50 | 显示全部楼层

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-11-15 17:04 来自手机 | 显示全部楼层
peter-chen 发表于 2018-11-15 16:50
解释得很详细,看看能学会吗

祝好运。      

TA的精华主题

TA的得分主题

发表于 2018-11-22 11:46 | 显示全部楼层
看了老师的所讲解的内容,深感佩服。
现在弄了几下,深深觉得应该把json弄透彻了,才可以弄清楚。
但json的解析貌似用用ScriptControl对象,把数据交给JavaScript处理,这才是比较有效的方法。
可是 对于java语句太过于简洁了,理解起来好难啊
老师能不能给讲讲。

TA的精华主题

TA的得分主题

 楼主| 发表于 2018-11-22 16:07 | 显示全部楼层
地天泰 发表于 2018-11-22 11:46
看了老师的所讲解的内容,深感佩服。
现在弄了几下,深深觉得应该把json弄透彻了,才可以弄清楚。
但json ...

如果没有JavaScript基础,是没有办法讲清楚的。

TA的精华主题

TA的得分主题

 楼主| 发表于 2019-2-5 16:02 | 显示全部楼层
本帖最后由 Kaohsing 于 2019-2-5 16:03 编辑

时间戳转北京时间
  1. Function timeStamp2pekingTime(timeStamp)
  2.     Dim html As Object
  3.     Dim win As Object
  4.     Dim tt As String
  5.     Set html = CreateObject("HTMLFILE")
  6.     Set win = html.parentWindow
  7.     tt = "var t =new Date(" & timeStamp & ");m= t.getMonth() + 1, d = t.getDate();var s= t.getFullYear() + '-' + (m < 10 ? '0' + m : m) + '-'+ (d < 10 ? '0' + d : d) + ' ' + t.toTimeString().substr(0, 8)"
  8.     win.execScript tt
  9.     timeStamp2pekingTime = win.s
  10. End Function
  11. Sub KAO()
  12.     MsgBox timeStamp2pekingTime("1546312879798")
  13. End Sub
复制代码


TA的精华主题

TA的得分主题

发表于 2019-4-10 23:17 | 显示全部楼层
老师好。。。。例子的 原网页已经 更换了。。
有新的例子吗?

我想跟着重新学习一下。。谢谢
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2024-3-28 19:48 , Processed in 0.047472 second(s), 8 queries , Gzip On, Redis On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表