您现在的位置:程序化交易>> 期货公式>> 金字塔等>> 金字塔知识>>正文内容

[求助]vba如何读取指定注册表键值? [金字塔]

  • 咨询内容: 比如我在后台里有句把这个键值赋值成目前的交易时间供vba读取~SETREGVAL('vba','mailtime',dynainfo(207));
    但是vba如何读取我后台写入的指定的注册表键值呢?下面这句没看懂~都不知道注册表键值去哪里找

    '测试注册表读写
    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

     

    这样试试

     

  • 用户回复:

    application.msgout result这句弹不出来啊~
    SETREGVAL('vba','mailtime',dynainfo(207));我要使用mailtime这个键值~用vba与后台做应答~怎么在vba里面调用出这个键值~

     

  • 网友回复: 没弹出来说明这个VBA语句没有运行,你可以再把需求描述的清楚一些,我们再看看如何帮你解决

     

  • 网友回复: 首先用后台运行这句SETREGVAL('vba','mailtime',dynainfo(207));把时间赋值给注册表
    然后用vba读取注册表这个键值~vba再引用当前交易时间与这个键值对比~
    if vba引用的当前交易时间-注册表键值>20秒 then begin//判断后台无应答为假死状态

    StopAlarmRun       停止后台程序化预警

    (这里可能需要停顿5-10秒,再启动后台)

    StartAlarmRun      启动后台程序化预警

    end


    防止后台假死

 

有思路,想编写各种指标公式,程序化交易模型,选股公式,预警公式的朋友

可联系技术人员 QQ: 1145508240  点击这里给我发消息进行 有偿 编写!不贵!点击查看价格!


【字体: 】【打印文章】【查看评论

相关文章

    没有相关内容