这段语句里的交易都执行了,可就是没收到邮件,现在sendmail是不是有问题?我VBA里写的成交回报,我都能收到邮件
IF VAUP THEN
BEGIN
IF A = 0 AND N < NN AND TIME < 151400 THEN
BEGIN
SELLSHORT(HOLDING < 0,TRAQTY,LIMITR,CLOSE + 0.2),ORDERQUEUE;
BUY(HOLDING = 0,TRAQTY,LIMITR,CLOSE + 0.2),ORDERQUEUE;
SENDMAIL(1, EMAIL,'开仓了' , '开仓了');
A: = 1;
B: = 0;
N: = N + 1;
END
END
函数本身是好的,看看你本地的邮件发送设置
http://www.weistock.com/WeisoftHelp/index.html
SENDMAIL(ISLASTBAR,'ABC@SINA.COM;XYZ@WEISTOCK.COM','开仓了' , '开仓了');