Excel VBA新浪接口修改后，行情更新速度慢了许多

收藏关注

修改了Excel VBA新浪接口后，发现行情更新速度变慢了许多
我就读取8支股票，现在更新一下经常要1分钟多，之前几秒就行。而且还时不时出现1-2支读取失败的。

不知道集友们有没有碰到类似情况。

发表时间 2022-02-08 12:38

赞同来自: yyttcc705

10 个回复

0

天地玄黄宇宙洪

@中子星

腾讯接口用这个https://blog.csdn.net/weixin_30753873/article/details/96207333

这个借口有效，谢谢！

2022-02-09 06:51 引用

0

经常卡住未反应

2022-02-08 23:47 引用

0

均金无忌 - 旅居泰国的退休工人

新浪升级完成，速度明显快了。而且非常稳定。没有timeout.

2022-02-08 22:47 引用

0

腾讯接口用这个https://blog.csdn.net/weixin_30753873/article/details/96207333

2022-02-08 22:21 引用

0

天地玄黄宇宙洪

@中子星

是的，我也这样。不过不影响使用。股票行情用腾讯接口吧。

请问腾讯接口需要修改程序的哪些地方呢？

2022-02-08 17:28 引用

0

是的，我也这样。不过不影响使用。股票行情用腾讯接口吧。

2022-02-08 13:10 引用

0

关注中，未发现这个问题

2022-02-08 12:55 引用

0

天地玄黄宇宙洪

以前失败三两次就可以读取了今天连续失败七八次还不能读取，而且报错都得过半分钟以前是在报错是非常快，秒错。这个新浪接口彻底废了吗？

2022-02-08 12:52 引用

1

赞同来自: 兜里响铛铛

Function GetHttp(Url)
Dim objXML
On Error Resume Next
Set objXML = CreateObject("WinHttp.WinHttpRequest.5.1")
With objXML
.Open "Get", Url, False, "", ""
.setRequestHeader "Referer", "http://finance.sina.com.cn"
.Send
GetHttp = .ResponseBody
End With
GetHttp = BytesToBstr(GetHttp, "GB2312")
Set objXML = Nothing
On Error GoTo 0
End Function

2022-02-08 12:50 引用

0

没发现

2022-02-08 12:45 引用

要回复问题请先登录或注册