VBS语句例子
Set Report1 = marketdata.GetReportData("580014","SH")
str = str & "580014" & " " & Report1.NewPrice & vbCrLf
...
Set Report11 = marketdata.GetReportData("031006","SZ")
str = str & "031006" & " " & Report11.NewPrice & vbCrLf
今天580021, 580022, 580027返回的ReportData全部是0
----
580014 1.21
580016 4.838
580017 7.945
580019 1.624
580021 0
580022 0
580024 1.583
580025 3.69
580026 5.73
580027 0
031006 11.227
----
以前有时候也会出现返回0的现象,但品种不固定。
以前的缺省数据服务器是杭州电信1,这两天切换到杭州电信2。
580021本月13号到期停止交易,这个品种这几天返回0是正常的。
贴几个前几天的记录(异常品种返回值都是0):
2009.09.25 正常
2009.09.25 异常 580027
2009.09.28 异常 580027
2009.09.30 异常 580027
2009.10.09 正常
2009.10.12 正常
2009.10.13 正常
2009.10.14 异常 580022, 580027
2009.10.15 异常 580019, 580022
2009.10.19 异常 580022, 580027
2009.10.20 异常 580022, 580027
以前是每3秒扫描一次,今天是每1秒扫描一次。
数据是0的情况是当天一直是0还是有时是0有时不是0,注意是当天的
那这样应该是数据源的问题。杭州电信目前在测试,个别品种的数据可能是有问题的
扣除580019、580022停牌因素,更新了记录:
2009.09.25 正常
2009.09.28 异常 580027
2009.09.30 异常 580027
2009.10.09 正常
2009.10.12 正常
2009.10.13 正常
2009.10.14 异常 580027
2009.10.15 正常
2009.10.19 异常 580027
2009.10.20 异常 580027
2009.10.21 异常 580027
问题都出在580027这一个品种上。
[此贴子已经被作者于2009-10-21 18:54:47编辑过]
报告,期货分笔也有这样的情况。
看历史分笔就是这样,但是界面显示是有数值的。委卖委买数据。
调用我还不会。