以文本方式查看主题 - 金字塔客服中心 - 专业程序化交易软件提供商 (http://www.weistock.com/bbs/index.asp) -- 金字塔软件问题提交 (http://www.weistock.com/bbs/list.asp?boardid=2) ---- 5分钟k线的数据用VBA实时导入到access数据库 (http://www.weistock.com/bbs/dispbbs.asp?boardid=2&id=64883) |
-- 作者:liwei_bj -- 发布时间:2014/5/12 7:03:45 -- 5分钟k线的数据用VBA实时导入到access数据库 我问一下,我想在盘中5分钟k线的数据用VBA实时导入到access数据库,但是由于金字塔对数据量做了限制导致无法得到最新的数据值,有什么办法解决吗?代码如下 set qtzq= marketdata.GetHistoryData("if00","ZJ",1) call application.MsgOut(qtzq.Count) 其中qtzq.Count的值因为限制,总是只能显示1001。但是我是想实时输出最后一个k线的收盘价。请斑竹帮忙吧!
|
-- 作者:RogarZ -- 发布时间:2014/5/12 8:45:48 -- 购买专业版 就没这个限制 |
-- 作者:liwei_bj -- 发布时间:2014/5/12 10:59:55 -- 专业版太贵了,我有购买的普通版,难道也不行?这是让一般用户都没法用呀! |
-- 作者:lichenghu -- 发布时间:2014/5/12 11:01:14 -- 这个是版本限制,不会做更改。 |
-- 作者:liwei_bj -- 发布时间:2014/5/12 12:35:32 -- 那有没有变通的方法?我就每5分钟往数据库里导入一个K线数据,用pel,VBS都行?可以用什么方法访问到最后一根K线?或者我实时导出分笔自己组成K线?就是太麻烦了。 |
-- 作者:王锋 -- 发布时间:2014/5/12 12:40:46 -- qtzq.Count()-1就是你最后一个数据的索引,你只要做个定时器,比如4分钟间隔一次的频率,读取5分钟的数据然后判断最后一笔数据的K线时间,如果出现新K线,则将qtzq.Count()-2倒数第二个写库,..................重复上述动作 [此贴子已经被作者于2014/5/12 12:41:11编辑过]
|
-- 作者:liwei_bj -- 发布时间:2014/5/12 13:02:36 -- 搞定啦,多谢!版主真牛!! |