[求助]vba如何讀取指定注冊(cè)表鍵值? [金字塔]
- 咨詢內(nèi)容:
比如我在后臺(tái)里有句把這個(gè)鍵值賦值成目前的交易時(shí)間供vba讀取~SETREGVAL('vba','mailtime',dynainfo(207));
但是vba如何讀取我后臺(tái)寫入的指定的注冊(cè)表鍵值呢?下面這句沒看懂~都不知道注冊(cè)表鍵值去哪里找'測(cè)試注冊(cè)表讀寫
Sub TestRegistry()
Set registry = CreateObject("stock.registry")
Call registry.Open("software\weisoft\金字塔\settings")
Call registry.WriteInt("id",123)
result=registry.ReadInt("id")
application.msgout result
End Sub - 金字塔客服:
Sub TestRegistry()
Set registry = CreateObject("stock.registry")
Call registry.Open("software\weisoft\金字塔\vba")
result=registry.ReadInt("id")
application.msgout result
End Sub這樣試試
- 用戶回復(fù):
application.msgout result這句彈不出來啊~
SETREGVAL('vba','mailtime',dynainfo(207));我要使用mailtime這個(gè)鍵值~用vba與后臺(tái)做應(yīng)答~怎么在vba里面調(diào)用出這個(gè)鍵值~ - 網(wǎng)友回復(fù):
沒彈出來說明這個(gè)VBA語句沒有運(yùn)行,你可以再把需求描述的清楚一些,我們?cè)倏纯慈绾螏湍憬鉀Q
- 網(wǎng)友回復(fù):
首先用后臺(tái)運(yùn)行這句SETREGVAL('vba','mailtime',dynainfo(207));把時(shí)間賦值給注冊(cè)表
然后用vba讀取注冊(cè)表這個(gè)鍵值~vba再引用當(dāng)前交易時(shí)間與這個(gè)鍵值對(duì)比~
if vba引用的當(dāng)前交易時(shí)間-注冊(cè)表鍵值>20秒 then begin//判斷后臺(tái)無應(yīng)答為假死狀態(tài)StopAlarmRun 停止后臺(tái)程序化預(yù)警
(這里可能需要停頓5-10秒,再啟動(dòng)后臺(tái))
StartAlarmRun 啟動(dòng)后臺(tái)程序化預(yù)警
end
防止后臺(tái)假死
有思路,想編寫各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 1145508240 進(jìn)行 有償 編寫!(不貴!點(diǎn)擊查看價(jià)格!)
相關(guān)文章
-
沒有相關(guān)內(nèi)容