欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。


金字塔客服中心 - 专业程序化交易软件提供商金字塔软件公式模型编写问题提交 → 请教Debugout ,Sendmail的问题。

   

欢迎使用金字塔普通技术服务论坛,您可以在相关区域发表技术支持贴。
我司技术服务人员将优先处理 VIP客服论坛 服务贴,普通区问题处理速度慢,请耐心等待。谢谢您对我们的支持与理解。    


  共有9498人关注过本帖树形打印复制链接

主题:请教Debugout ,Sendmail的问题。

帅哥哟,离线,有人找我吗?
bhwhui
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:论坛游民 帖子:208 积分:1565 威望:0 精华:2 注册:2009/8/23 19:18:53
请教Debugout ,Sendmail的问题。  发帖心情 Post By:2009/12/7 12:33:28    Post IP:221.7.173.165[显示全部帖子]

在监控中选取1秒周期监控。我想每5分钟监控一次,发一次邮件。代码如下:

 

l4:INTPART(CurrentTIME/100)+1;
r2:Currenttime-INTPART(CurrentTIME/100)*100;
//ok:=(l4>0900 and l4<=1015 or l4>1030 and l4<=1130 or l4>1330 and l4<=1500);
ok:=1;
if (60-r2)<=3 and ok and l4/5=intpart(l4/5) then   //5min显示一次
begin
ts:=NUMTOSTR(currenttime(),0)+' 资产:'+numtostr(Tasset,0)+' 持仓:'+numtostr(Tholding,0)+' 均价:'+numtostr(TAVGENTERPRICE,0)+' 现价:'+numtostr(c,0)+' 止损:';
Debugout(ts,1);
Sendmail(1,'380777985@qq.com','金字塔提示',ts);
end;

现在的问题是:

1:每1秒,监控的小窗口就会自动输出一行字,例如:

09.12.07 12:12:21 M09
运行结束
09.12.07 12:12:22 M09
运行结束
09.12.07 12:12:23 M09
运行结束
09.12.07 12:12:24 M09
运行结束
09.12.07 12:12:25 M09
运行结束

 

没办法控制不让每秒输出?而仅每5min和有成交的时候输出(以上程序控制的是每5min,没控制成交时间)?

 

2:Sendmail 需要调通什么环节?Outlook?以上语句有错误么?

 

谢谢。

[此贴子已经被作者于2009-12-7 12:33:57编辑过]

 回到顶部