以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  高级功能研发区  (http://weistock.com/bbs/list.asp?boardid=5)
----  GetHistoryData("IF00","ZJ",6)周数据问题  (http://weistock.com/bbs/dispbbs.asp?boardid=5&id=48667)

--  作者:xieguihua
--  发布时间:2013/2/19 16:39:26
--  GetHistoryData("IF00","ZJ",6)周数据问题

请教老师:

 set weekk=marketdata.GetHistoryData("IF00","ZJ",6)

     weekk.openint(monthh.Count-1)

按说应该得到周持仓数据,但是结果显示为日持仓数据,这是为什么呢,


--  作者:王锋
--  发布时间:2013/2/19 18:03:43
--  
持仓量的周线是不会加合的,只有成交量才会
--  作者:xieguihua
--  发布时间:2013/2/20 9:53:28
--  

 For j=0 to UBound(marketName) 
      Cou = MarketData.GetReportCount(marketName(j))
      For i = 0 To Cou-1
        Set Report1= MarketData.GetReportDataByIndex(marketName(j),i)
         set dayy=marketdata.GetHistoryData(Report1.label,marketName(j),5)
             if date()=dayy.date(dayy.Count-1) then
                      application.MsgOut "日期为:"&dayy.date(dayy.Count-1)&" "& Report1.label &"  开盘价为:"&dayy.open(dayy.Count-1)&" 收盘价为:"& dayy.close(dayy.Count-1) &"  成交量为:"& dayy.volume(dayy.Count-1)                
            end if
     next
    next
    application.MsgOut  "日度数据!"
  dim weekk
  set weekk=nothing
  dim Report3
  set Reprot3=nothing
 
 
  if  Weekday(date())=3 or date()=dateValue(09/21/2013)   then
  m=m+1
  For j=0 to UBound(marketName)
      Couuu = MarketData.GetReportCount(marketName(j))
      For i = 0 To Couuu-1
          Set Report3 = MarketData.GetReportDataByIndex(marketName(j),i)
          set weekk=marketdata.GetHistoryData(Report3.label,marketName(j),6)
          if date()=weekk.date(weekk.Count-1) then 
                        application.MsgOut "日期为:"&weekk.date(weekk.Count-1)&" "& Report3.label &"  开盘价为:"&weekk.open(weekk.Count-1)&" 收盘价为:"& weekk.close(weekk.Count-1) &"  成交量为:"& weekk.volume(weekk.Count-1)
         end if
     next
     next
      application.MsgOut  "周度数据!"
  end if

 

结果为:

日期为:2013-2-20 IF00  开盘价为:2713.2 收盘价为:2707.8  成交量为:51492
日期为:2013-2-20 IF03  开盘价为:2713.2 收盘价为:2707.8  成交量为:51492
日期为:2013-2-20 IF04  开盘价为:2728 收盘价为:2722.2  成交量为:755
日期为:2013-2-20 IF06  开盘价为:2745 收盘价为:2743  成交量为:1226
日期为:2013-2-20 IF09  开盘价为:2777 收盘价为:2768.4  成交量为:114
日期为:2013-2-20 IF13  开盘价为:2720.1 收盘价为:2715  成交量为:53487
日度数据!
日期为:2013-2-20 IF00  开盘价为:2713.2 收盘价为:2707.8  成交量为:51492
日期为:2013-2-20 IF03  开盘价为:2713.2 收盘价为:2707.8  成交量为:51492
日期为:2013-2-20 IF04  开盘价为:2728 收盘价为:2722.2  成交量为:755
日期为:2013-2-20 IF06  开盘价为:2745 收盘价为:2743  成交量为:1226
日期为:2013-2-20 IF09  开盘价为:2777 收盘价为:2768.4  成交量为:114
日期为:2013-2-20 IF13  开盘价为:2720.1 收盘价为:2715  成交量为:53487
周度数据!

 

 

周度数据与日度数据完全是一样的。