金字塔软件问题提交-orderstatus成功金字塔客服中心 - 专业程序化交易软件提供商

以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://weistock.com/bbs/index.asp)
--  金字塔软件问题提交  (http://weistock.com/bbs/list.asp?boardid=2)
----  orderstatus成功  (http://weistock.com/bbs/dispbbs.asp?boardid=2&id=184151)

--  作者：weishao
--  发布时间：2021/2/1 9:05:01
--  orderstatus成功
orderstatus成功
此主题相关图片如下：orderstatusex2.成功.png

--  作者：yukizzc
--  发布时间：2021/2/1 9:26:55
--
请问是什么问题？

--  作者：weishao
--  发布时间：2021/2/1 10:37:27
--
现在没问题,看看后面在pel里判断的函数取ini的值会不会来的及取值,

--  作者：weishao
--  发布时间：2021/2/1 13:46:05
--  刚启动时,未登入账户出现

Sub ORDER_OrderStatusEx2(OrderID, Status, Filled, Remaining, Price, Code, Market, OrderType, Aspect, Kaiping,Account, AccountType)
Set ReportData = MarketData.GetReportData(Code,Market)
PZMC=ReportData.StockName
此主题相关图片如下：刚启动时,未登入账户出现.png

帮忙哪里改一下,判断

--  作者：yukizzc
--  发布时间：2021/2/1 13:52:30
--

你根据status判断下，不是订单状态的就不执行

--  作者：weishao
--  发布时间：2021/2/1 14:16:50
--
应该是账户没登入,vba已经执行了
加上
if status="Connected" then
Set ReportData = MarketData.GetReportData(Code,Market)
PZMC=ReportData.StockName
end if
还是会有
此主题相关图片如下：刚启动时,未登入账户出现2.png

--  作者：yukizzc
--  发布时间：2021/2/1 14:23:10
--

电话我把

021-20339087

--  作者：weishao
--  发布时间：2021/2/1 14:26:29
--

mystatus="FILLED" OR "SUBMITTED" OR "TRADEING"
if UCase(Status)=mystatus then
Set ReportData = MarketData.GetReportData(Code,Market)
PZMC=ReportData.StockName
end if

--  作者：yukizzc
--  发布时间：2021/2/1 14:38:29
--

第一句语法逻辑有错