共6 条记录, 每页显示 10 条, 页签: [1]

标题：[求助]如何引用实盘真实成交价然后写入注册表供后台调用？

1楼

ch3coohqb 发表于：2015/7/15 13:59:02

Sub ORDER_OrderStatusEx2(OrderID, Status, Filled, Remaining, Price, Code, Market, OrderType, Aspect, Kaiping, Account, AccountType)

if Status="Tradeing" and filled>0 and Account="00545" then

SETREGVAL('semi','enterprice',Price);

...

就是实现以上的语句~

该帐户成交一笔~然后把成交价写进注册表供后台调用~

如何实现？

就是写注册表那句我不会

2楼

yukizzc 发表于：2015/7/15 14:38:08

看看这里连接，几种记录方式都有

http://www.weistock.com/bbs/dispbbs.asp?BoardID=5&ID=52674&skin=0

3楼

ch3coohqb 发表于：2015/7/15 14:49:23

看过了还是不晓得弄~

麻烦谁高抬贵手

把我这个代码给补充一下~

不会超过3分钟的时间~

也就是个VBA写进注册表的事情

4楼

ch3coohqb 发表于：2015/7/15 15:05:57

感觉都知道怎么写

唯独就是没人写代码啊

5楼

王锋发表于：2015/7/15 15:30:08

升级到3.63版本，自带这类函数了，请置顶贴看升级说明

6楼

guotx2010 发表于：2015/7/16 8:48:34

if Status="Tradeing" and filled>0 and Account="00545" then

    Set registry = CreateObject("stock.registry")
   Call registry.Open("software\weisoft\金字塔\settings")
   Call registry.WriteInt("enterprice",price)
end if

共6 条记录, 每页显示 10 条, 页签: [1]