解析网页源码，获得所需数据。

1234vba · 发表于 2019-4-10 23:19

我发现我卡在 split函数上了。。

1234vba · 发表于 2019-4-10 23:25

在 VBA代码编辑框里。。

我添加了监视，怎么无法监视到 tt = .responseText 的内容的呢

Sub test()
Dim tt As String
Set oHttp = CreateObject("MSXML2.XMLHTTP")‘用WinHttp.WinHttpRequest.5.1 get，网页返回危险行为。只能用XMLhttp了
With oHttp
.Open "GET", "网址", False
.send
tt = .responseText

Debug.Print Len(tt)
Debug.Print tt

End With

End Sub

1234vba · 发表于 2019-4-10 23:52

老师好。。。

像这样的。。如何提取呢

47195</div>

vv = Split(tt, "<span class="="viewso_（*）") 这样写不对。。要如何写呢？

qx-liuwx · 发表于 2019-4-11 07:10

每次回帖、谢谢！辛苦了。

Kaohsing · 发表于 2020-4-16 21:15

qx-liuwx 发表于 2019-4-11 07:10
每次回帖、谢谢！辛苦了。

谢谢

kings12333 · 发表于 2020-4-16 22:24

Kaohsing 发表于 2018-8-11 22:05

重温以前的旧贴，再看到这些代码感谢老师的讲解，下次再课能不能讲下关于数组这方面的，我发现数据量大量用数组会非常快，但总是学不懂……这个网抓也是学了老师的这个贴子才学会用的……谢谢！

koala219 · 发表于 2020-4-17 13:01

不错的东西，留个印记，方便查阅

Kaohsing · 发表于 2020-6-6 20:13

289只基金净值数据

莫悠悠 · 发表于 2020-11-30 15:31

Kaohsing 发表于 2017-11-2 12:40
列二
网址http://data.eastmoney.com/zjlx/detail.htmlS

请教老师，以下地址应该怎样写脚本？
http://push2.eastmoney.com/api/q ... amp;fs=m:0+t:6+f:!2,m:0+t:13+f:!2,m:0+t:80+f:!2,m:1+t:2+f:!2,m:1+t:23+f:!2,m:0+t:7+f:!2,m:1+t:3+f:!2&stat=1&fields=f12,f14,f2,f3,f62,f184,f66,f69,f72,f75,f78,f81,f84,f87,f204,f205,f124&rt=53516505&cb=jQuery1830677714390419299_1605495162545&_=1605495169234

五指山888 · 发表于 2021-4-26 11:53

Kaohsing 发表于 2017-11-2 15:25

到第26句卡住了

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

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

评分

评分