欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件高级功能研发区 → 还是关于自动连接的问题

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有5497人关注过本帖树形打印复制链接

主题:还是关于自动连接的问题

帅哥哟,离线,有人找我吗?
stockwiner
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:311 积分:635 威望:0 精华:0 注册:2011/1/20 14:44:58
还是关于自动连接的问题  发帖心情 Post By:2014/6/18 9:01:23 [显示全部帖子]

这是我早上VBA自动连接后的截图

图片点击可在新窗口打开查看此主题相关图片如下:捕获.jpg
图片点击可在新窗口打开查看

在交易时段,我通过 VBA每一分钟自动判断当前是否连接。
从截图可以看到,通过VBA连接后,股票行情处于“连接中”状态,但VBA函数去判断连接状态时,对于“连接中”的状态也是返回1,即默认已连接,但事实上并没有连接成功。

 回到顶部
帅哥哟,离线,有人找我吗?
stockwiner
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:311 积分:635 威望:0 精华:0 注册:2011/1/20 14:44:58
  发帖心情 Post By:2014/6/18 9:32:16 [显示全部帖子]

if ttt>cdate("08:56:00") and ttt<cdate("15:15:00") and application.ReceiveDatastatus=0 then 
       call application.ReceiveData(1)
       application.MsgOut "已连接! "&date()&" "&time()
     end if
     if ttt>cdate("15:15:00") and  application.ReceiveDatastatus then 
       call application.ReceiveData(0)
       application.MsgOut "断开连接! "&date()&" "&time()
     end if

这个是每天开盘前自动连接,收盘后自动断开!

 回到顶部
帅哥哟,离线,有人找我吗?
stockwiner
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:311 积分:635 威望:0 精华:0 注册:2011/1/20 14:44:58
  发帖心情 Post By:2014/6/18 9:35:54 [显示全部帖子]

if oautoit.winexists("金字塔") then 
       call oautoit.WinClose("金字塔")
       'call oautoit.sleep(1000)
       application.MsgOut "断线了!"&date()&" "&time()
       call application.ReceiveData(0)
  end if
if ttt>cdate("08:56:00") and ttt<cdate("15:15:00") and application.ReceiveDatastatus=0 then 
       call application.ReceiveData(1)
       application.MsgOut "已连接! "&date()&" "&time()
     end if
     if ttt>cdate("15:15:00") and  application.ReceiveDatastatus then 
       call application.ReceiveData(0)
       application.MsgOut "断开连接! "&date()&" "&time()
     end if

这段是VBA中的代码,通过每分钟中断一次来调用。
当出现断线时,会弹出“金字塔”的断线窗口,通过判断是否存在该窗口,来判断是否断线 !
下面是 每天开盘前自动连接,收盘后自动断开!

 回到顶部
帅哥哟,离线,有人找我吗?
stockwiner
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:311 积分:635 威望:0 精华:0 注册:2011/1/20 14:44:58
  发帖心情 Post By:2014/6/19 19:34:31 [显示全部帖子]

有没有声音?

 回到顶部
帅哥哟,离线,有人找我吗?
stockwiner
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:311 积分:635 威望:0 精华:0 注册:2011/1/20 14:44:58
  发帖心情 Post By:2014/6/25 15:02:29 [显示全部帖子]

这个问题有回应吗?

 回到顶部
帅哥哟,离线,有人找我吗?
stockwiner
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:311 积分:635 威望:0 精华:0 注册:2011/1/20 14:44:58
  发帖心情 Post By:2014/6/25 19:47:27 [显示全部帖子]

回楼上,请问下:处于“连接中”状态,金字塔系统能自己判断为“断线”吗? 还是“连线”?
到少我从VBA函数的返回值来看,是处于“连线”,虚假连线!
我很好奇这么重大的BUG 你们无视吗?


 回到顶部
帅哥哟,离线,有人找我吗?
stockwiner
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游侠 帖子:311 积分:635 威望:0 精华:0 注册:2011/1/20 14:44:58
  发帖心情 Post By:2014/6/25 19:48:48 [显示全部帖子]

我的意见很简单:对于断线 返回0;已连接,返回 1; 连接中 返回 -1;
至少得给个状态吧!

 回到顶部