- 金字塔客服中心 - 专业程序化交易软件提供商 (http://weistock.com/bbs/index.asp)
-- 高级功能研发区 (http://weistock.com/bbs/list.asp?boardid=5)
---- GetHistoryDataByDate时间限制失效 (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=144480)
-- 发布时间：2016/12/12 3:02:15
-- GetHistoryDataByDate时间限制失效
\'不同品种为独立的缓冲区.
marketdata.HistoryDataMode = 1
set sh001 = marketdata.GetHistoryDataByDate("if00", "zj", 1, "2016/12/9", "2016/12/9") \'marketdata.GetHistoryData("sh001", "sh", 0)
lastIndex = sh001.Count - 1
\'MsgBox sh001.close(lastIndex)
MsgBox sh001.Date(0) \' 显示2016/10/17 10:05:00 为什么时间限制无效呢??
MsgBox sh001.Date(lastIndex) \'显示2016/12/9 15:00:00 显示正确
\' 数据处理完毕后, 清理缓冲区.
marketdata.DestroyHistoryData
-- 发布时间：2016/12/12 9:40:37
--
分钟级别的历史数据，时间限制加上09:00:00 15:00:00配合日期一起
-- 发布时间：2016/12/12 11:41:46
--
还是不行啊,另外设置为日线,也是不能限制.
您试试,看看您的环境是不是可以?多谢!
-- 发布时间：2016/12/13 12:49:00
--
此主题相关图片如下：x_xjo}yw(sr9vw)kf{e16_e.png
如果不行，重启下软件试试
-- 发布时间：2016/12/14 12:45:48
--
Set sh001_test = marketdata.GetHistoryDataByDate("000001", "sh", 1, "2016/12/12 09:30:00", "2016/12/12 15:00:00") \'5分钟数据正确
Set sh001_test = marketdata.GetHistoryDataByDate("000001", "sh", 0, "2016/12/12 09:30:00", "2016/12/12 15:00:00") \'1分钟则得不到正确结果
-- 发布时间：2016/12/14 12:54:57
--
上面的帖子我发错了,请版主删之.
在我机子上还是不行,无论多少周期,版本都是最新的了...
不过我想了个办法暂时绕过这个问题,等弄明白为什么了再来告诉你.
多谢啦!!
-- 发布时间：2016/12/14 20:11:00
--
Set sh001_test = marketdata.GetHistoryDataByDate("000001", "sh", 0, "2016/12/12 09:30:00", "2016/12/12 15:00:00") \'1分钟则得不到正确结果
Application.MsgOut sh001_test.count
这个代码我们这里测试也没什么问题，不知道你机器具体怎么回事