以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  ReportData 对象问题  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=140609)

--  作者:wjm3333
--  发布时间:2016/10/11 10:40:38
--  ReportData 对象问题

ReportData 对象date国庆节前一直正常,节后就不对了,日期是2016/10/1,今天应该是2016/10/11,请检查一下


--  作者:yukizzc
--  发布时间:2016/10/11 10:50:46
--  

我这边图上看的是白糖,输出如下软件版本4.0beta2


图片点击可在新窗口打开查看此主题相关图片如下:`f$znevco~2(84_75z1ex3g.png
图片点击可在新窗口打开查看


--  作者:wjm3333
--  发布时间:2016/10/11 11:43:46
--  
谢谢回复,我的代码是

sub test1()
set rt = marketdata.GetReportData("300338","SZ")
application.MsgOut Date &" " &Time& "输出今天数据日期:"& cdate(left(rt.date, 9))
application.MsgOut Date &" " &Time& "输出今天日期:"& cdate(date)
end sub

结果是
2016/10/11 11:41:03输出今天数据日期:2016/10/1
2016/10/11 11:41:03输出今天日期:2016/10/11

你在看看怎么回事啊

--  作者:wjm3333
--  发布时间:2016/10/11 11:52:47
--  
sub test1()
set rt = marketdata.GetReportData("300338","SZ")
application.MsgOut Date &" " &Time& "输出今天数据日期:"& cdate(left(rt.date, 9))
application.MsgOut Date &" " &Time& "输出今天数据最新价格:"& rt.NewPrice
application.MsgOut Date &" " &Time& "输出今天日期:"& cdate(date)
end sub

结果是
2016/10/11 11:48:17输出今天数据日期:2016/10/1
2016/10/11 11:48:17输出今天数据最新价格:22.51
2016/10/11 11:48:17输出今天日期:2016/10/11

价格正确,日期不正确

--  作者:yukizzc
--  发布时间:2016/10/11 13:18:48
--  

请看下300338该品种,今天有行情吗?

打开k线图即可


--  作者:wjm3333
--  发布时间:2016/10/11 14:11:22
--  
当然了我今天买的票,实时价格没问题,就是日期是不对图片点击可在新窗口打开查看
--  作者:yukizzc
--  发布时间:2016/10/11 14:52:59
--  

left(rt.date, 9)

你这边用了left截取了日期从左开始9个单词,当然会变成10/1咯


--  作者:wjm3333
--  发布时间:2016/10/11 15:00:01
--  
哦,明白了不好意思,国庆节前对是因为取了9位,现在10月了应该取10位,谢谢大师指点