關(guān)于order下單的問(wèn)題

作者：金字塔來(lái)源：cxh99.com 發(fā)布時(shí)間：2015年01月10日

咨詢內(nèi)容： 忽然想到一個(gè)有點(diǎn)"杞人憂天"的想法,比如下面的語(yǔ)句:
result=order.buy()if result=-1 then ....
order下單之后,如果回報(bào)較慢,會(huì)不會(huì)出現(xiàn)明明下單成功了,但由于程序運(yùn)行速度過(guò)快,以致于沒(méi)有等到成交回報(bào)就返回,導(dǎo)致result錯(cuò)誤返回-1.可能出現(xiàn)這種情況嗎?不知道這個(gè)擔(dān)心是不是很白癡
金字塔客服： 不用擔(dān)心，返回值是你的報(bào)單ID,不是成交回報(bào)，報(bào)單ID不用等成交回報(bào)的
用戶回復(fù)： 這個(gè)Result=ORDER.BUY(....)我感覺(jué)肯定有問(wèn)題,我今天早上,不斷重復(fù)開(kāi)倉(cāng),就是因?yàn)橄聠纬晒Φ玆esult錯(cuò)誤返回0造成的.具體來(lái)說(shuō)
BUYcon=Document.GetPrivateProfileString("OrderCon",tLabel & "BUYCon_" & tIndex,"","D:\SystemSet.ini") '本次觸發(fā)條件 BUYconL=Document.GetPrivateProfileString("OrderCon",tLabel & "BUYConL_" & tIndex,"","D:\SystemSet.ini") '保存的上次觸發(fā)條件,以便一根k線一條語(yǔ)句僅執(zhí)行一遍
if BUYcon<>BUYconL then order.OrderQueue = 1 orderlog=Date & " " & Time & ",賬戶:" & tAcc & "," & tMarket & tCode & "在VBABUY中下單,手?jǐn)?shù):" & Num & ",原因:" & BUYcon & "<>" & BUYconL '每句下單命令前都要寫(xiě)入下單日志便于查找原因 Document.DebugFile "D:\OrderLog.txt",orderlog,0 Result=ORDER.BUY(1,Num,0,0,tCode,tMarket,tAcc,0)
if Result=0 then orderstr="賬號(hào):" & tAcc & "," & tMarket & tCode & "," & Num & "手多開(kāi)下單失敗!重點(diǎn)檢查賬號(hào)是否登錄" JIANGE tCode & "orderfail1",orderstr exit sub end if
Document.WritePrivateProfileString "OrderCon",tLabel & "BUYConL_"& tIndex,BUYcon,"D:\SystemSet.ini" '我現(xiàn)在是把這句放在if Result=0 then前面,因?yàn)榘l(fā)現(xiàn)有時(shí)下單成功卻result返回0,以致執(zhí)行了exit sub,后面無(wú)法寫(xiě)入tLabel & "BUYConL_"& tIndex,從而不斷重復(fù)開(kāi)倉(cāng)! ordermsg tCode,tMarket,Num,1
end if [此貼子已經(jīng)被作者于2014/9/10 13:26:02編輯過(guò)]
網(wǎng)友回復(fù)： 請(qǐng)你們?cè)贉y(cè)試一下
網(wǎng)友回復(fù)： 是否方便將你記錄的日志也發(fā)過(guò)來(lái),最好是別用INI文件,我們需要是那種連續(xù)記錄的日志,這樣可以對(duì)歷史下單記錄進(jìn)行分析的