- Foxtable(狐表) (http://foxtable.net/bbs/index.asp)
-- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2)
---- 新人求助，如何让狐表访问网络，并自动将返回数据填入单元格 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=98333)
-- 发布时间：2017/3/28 10:57:00
-- 新人求助，如何让狐表访问网络，并自动将返回数据填入单元格
如何让狐表访问网络，并自动将返回数据填入单元格。比如，在a1中填入股票代码601006，然后狐表就自动访问http://hq.sinajs.cn/list=sh601006这个url，并将返回的数据填入b列中。请大神看看能实现这个功能吗
-- 发布时间：2017/3/28 11:59:00
--
参考代码
Dim hc As New HttpClient("http://hq.sinajs.cn/list=sh601006")
hc.ResponseEncoding = "gb2312"
Dim str As String = hc.GetData()
output.show(str)
str = str.Split("=")(1).replace("""", "")
output.show(str)
Dim ary() As String = str.split(",")
msgbox(ary(0))
msgbox(ary(1))
[此贴子已经被作者于2017/4/11 16:05:50编辑过]
-- 发布时间：2020/12/16 17:22:00
--
