主题：账户登录和锁定

想用VBA做一个后台监控程序：

 

1、如何用VBA登录一个指定的实盘帐号？

2、VBA如何开放、关闭该账户的交易权限？（比如亏损到一定程度，程序自动控制不准该账户继续下单交易，包括手动）？

    SetOpenStatus 能否关闭手动开仓？

 

3、用什么方法获得该账户当次开仓的回撤值？

测试了SetOpenStatus，可以控制手动开仓，但是如何控制不再其他软件登录，然后开仓操作呢？这个禁止开仓，是金字塔软件的禁止还是期货公司的禁止？

1、application.PostMessage(33846)        //交易菜单->登录交易平台     33846            

2、这个是软件的设置，当然不是期货公司的禁止

3、order对象下HoldingInfo2 方法，里面有品种浮盈的输出

1、希望能够通过VBA直接写入账号、密码登录那种，不是目前这个弹出对话框，然后再输入账号、密码。

因为这样登录，用程序写好了账号，通过服务器发密码给客户端VBA接收，直接登录账号，就不需要把密码给客户端知道，这样，就和SetOpenStatus形成互补，在锁定不允许开仓的时候，将该账户锁住，就算用其他软件登录，也没有密码。

你这个要求我们暂时做不到，vba控制登陆目前存在一些风险。

行吧，我们想办法。

SetOpenStatus 这个方法，重新登录账户，状态就会释放，需要重新锁一次。