3.8 beta3 新版本分笔数据 VBS保存问题 - 金字塔软件问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

3.8 beta3 新版本，在 MinuteData对象增加分笔数据

Set MinuteData = marketdata.GetHistoryMinuteData("if00","zj","2015-12-29")

minutedata.InsertAt(minutedata.Count)

minutedata.Date(minutedata.Count) = "15:14:59"

minutedata.NewPrice(minutedata.Count) = 777

call minutedata.SaveData("IF00","ZJ")

marketdata.DestroyMinuteData

目前只有 minutedata.InsertAt(minutedata.Count) 是最末加了个空记录进去

空记录赋值不是无效果，就是软件直接报错，请检查

-----------------------------------------------------------------------------

前问题是想在已有的某日分笔数据里增加或修正某条分笔记录时的问题

现在的问题是假设2015/12/24整日分笔数据缺失，进行整日添加

Set MinuteData = marketdata.GetHistoryMinuteData("if00","zj","2015-12-24")

msgbox minutedata.Count ‘显示 0，说明该日无分笔记录，看上去正确

minutedata.InsertAt(minutedata.Count) ’运行无错误

msgbox minutedata.Count ‘显示1，说明已增加1笔空记录

minutedata.Date(minutedata.Count) = "15:14:59" ’貌似该行没起作用

minutedata.NewPrice(minutedata.Count) = 777 ’貌似该行没起作用

call minutedata.SaveData("IF00","ZJ") ‘存是存了，文件是1970年的，软件内查看数据是1975年的..... , 应该存 2015/12/24

marketdata.DestroyMinuteData

save设返回值也是1，貌似Save成功的，是否属性赋值语句我写得有问题？

主题：3.8 beta3 新版本 分笔数据 VBS保存问题