以文本方式查看主题

-  金字塔客服中心 - 专业程序化交易软件提供商  (http://222.73.7.161/bbs/index.asp)
--  公式模型编写问题提交  (http://222.73.7.161/bbs/list.asp?boardid=4)
----  如何在开盘和收盘时发个邮件  (http://222.73.7.161/bbs/dispbbs.asp?boardid=4&id=2240)
--  作者：beitang
--  发布时间：2010/7/25 11:04:21
--  如何在开盘和收盘时发个邮件

监控后台交易是否正常，想在开盘时和收盘前10分钟，各发一个邮件。程序该如何写？请高手指点，谢谢！
--  作者：admin
--  发布时间：2010/7/26 7:46:02
--  

SENDMAIL(CURRENTTIME=090100,\'ABC@SINA.COM;XYZ@WEISTOCK.COM\',\'警报\',\'开盘了\');
SENDMAIL(CURRENTTIME=145000,\'ABC@SINA.COM;XYZ@WEISTOCK.COM\',\'警报\',\'收盘了\');

 

如果在1分钟周期做，会在指定时间发送邮件。
--  作者：beitang
--  发布时间：2010/7/26 8:49:45
--  

谢谢！

问题是，如果我是间隔3秒轮循的，不就会发很多邮件吗？

有些是1小时线上的。
--  作者：admin
--  发布时间：2010/7/26 17:05:46
--  

加全局变量数据库控制，出现警报后置今日的标志位，然后判断标志位控制当天只发一次预警

 

IF ISLASTBAR THEN
BEGIN
 IF CURRENTTIME=090100 THEN
 BEGIN
  DATE1:=EXTGBDATA(\'THISOPEN\');
  IF DATE1 <> DATE THEN
  BEGIN
   SENDMAIL(1,\'ABC@SINA.COM;XYZ@WEISTOCK.COM\',\'警报\',\'开盘了\');
   EXTGBDATASET(\'THISOPEN\',DATE);
  END
 END
  
 IF CURRENTTIME=145000 THEN
 BEGIN
  DATE2:=EXTGBDATA(\'THISCLOSE\');
  IF DATE2 <> DATE THEN
  BEGIN
   SENDMAIL(1,\'ABC@SINA.COM;XYZ@WEISTOCK.COM\',\'警报\',\'收盘了\');
   EXTGBDATASET(\'THISCLOSE\',DATE);
  END
 END
END
--  作者：guotx2010
--  发布时间：2011/4/23 19:57:28
--  
一天只执行一次某种操作，是我想找的东西。
--  作者：期指新手
--  发布时间：2011/4/23 20:30:55
--  
有简单的方法能解决
--  作者：蓝山四季
--  发布时间：2012/3/23 15:28:32
--  
请问是否需要每天收盘后手动删除全局变量数据库？
--  作者：蓝山四季
--  发布时间：2012/3/23 16:32:33
--  

知道了
--  作者：ssshhh
--  发布时间：2014/10/4 21:16:02
--  
如何在每次成交后发个邮件？
--  作者：王锋
--  发布时间：2014/10/4 22:01:42
--  

使用手机监控功能就行了,成交后有推送信息的