Rss & SiteMap

金字塔客服中心 - 专业程序化交易软件提供商 http://www.weistock.com/bbs/

专业程序化软件提供商
共17 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:我怎么取不到持仓?

1楼
幽幽 发表于:2014/6/19 11:14:41
Dim ss
Dim aa
Dim zz
Sub OrderFailed_button_Click()   '开始按钮控件单击事件,事件触发后执行下面的语句
 call  application.SetTimer(0,100)  '注册定时器,而后会执行了这个事件
                                    'Sub PPLICATION_Timer(ID)
  aa=1                              '设置时间
  OrderFailed_text="wocaonimama"
  ss = "wocaonimama"                '将对象赋值存储设定品种信息
End Sub

Sub APPLICATION_Timer(ID)    '注册定时器后,而后会执行了这个事件
      aa=aa+1
      OrderFailed_button.caption=aa '获取数据显示
      zz=order.GetTholding("if","zj","8541000015",-1)
      OrderFailed_text="当前持仓为:"&zz&"手"
end sub   
源代码,我想知道账户持仓情况,为什么总是显示为0?
2楼
admin 发表于:2014/6/19 11:17:10
你要填具体的合约名称, 金字塔的合法的品种名称是 品种代码+交割月,建议你F2看看动态显示牌上的品种代码格式规范
3楼
幽幽 发表于:2014/6/19 11:38:36
  zz=order.GetTholding("if06","zj","8541000015",-1)
没有,我改成if06还是不行,调用HOLDING函数也不行。
都是0,不论模拟盘和实盘账户,查到的结果还是0。。。。。。
4楼
admin 发表于:2014/6/19 11:45:23
Sub APPLICATION_Timer(ID)    '注册定时器后,而后会执行了这个事件
      Application.msgout "asdsasda"
      aa=aa+1
      OrderFailed_button.caption=aa '获取数据显示
      zz=order.GetTholding("if","zj","8541000015",-1)
      OrderFailed_text="当前持仓为:"&zz&"手"
end sub   
 
你加上这句话,首先确认这个函数已经执行过了再说吧,另外你是否据有专业版权限
5楼
幽幽 发表于:2014/6/19 11:48:05
我没有专业版的权限,程序是执行过了的。
仅仅获取持仓需要专业版的权限吗?
6楼
幽幽 发表于:2014/6/19 11:51:18
发不了图
7楼
幽幽 发表于:2014/6/19 11:51:30

图片点击可在新窗口打开查看此主题相关图片如下:qq截图20140619115133.jpg
图片点击可在新窗口打开查看
8楼
admin 发表于:2014/6/19 11:54:13

Sub Test()
  application.msgout order.GetTholding("if06","zj","40005382",-1)
End Sub

 

通过简单做了个宏测试,这里是正常的.你还是检查一下你的交易账号是否填写正确吧

 

还有你要升级到最新版 3.21

[此贴子已经被作者于2014/6/19 11:54:54编辑过]
9楼
幽幽 发表于:2014/6/19 12:40:34
哦哦,我搞错了,它是只能监控自己当前的账户对吧?我用我自己的账户就对了
10楼
幽幽 发表于:2014/6/19 13:02:41
那为什么
Sub APPLICATION_Timer(ID)    '注册定时器后,而后会执行了这个事件
      aa=aa+1
      OrderFailed_button.caption=aa '获取数据显示
      zz=order.GetTholding("if06","zj","9000441",-1)
      Dim bb
      bb=order.Holding
      OrderFailed_text="当前持仓为:"&zz&"手"&bb
end sub 
我这样写,HOLDING获取不到持仓量呢?调试的时候MSGOUT也是0 啊
共17 条记录, 每页显示 10 条, 页签: [1] [2]


Powered By Dvbbs Version 8.3.0
Processed in 0.10547 s, 2 queries.