如何在开盘和收盘时发个邮件 - 公式模型编写问题提交 - 金字塔客服中心 - 专业程序化交易软件提供商

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

金字塔客服中心 - 专业程序化交易软件提供商 → 金字塔软件 → 公式模型编写问题提交 → 如何在开盘和收盘时发个邮件

共有9567人关注过本帖树形打印复制链接主题：如何在开盘和收盘时发个邮件

beitang

小大 1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游侠帖子：138 积分：947 威望：0 精华：0 注册：2010/7/20 12:13:13

如何在开盘和收盘时发个邮件 发帖心情

Post By：2010/7/25 11:04:21 Post IP：113.116.219.84[只看该作者]

监控后台交易是否正常，想在开盘时和收盘前10分钟，各发一个邮件。程序该如何写？请高手指点，谢谢！

admin

小大 2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：7302 积分：32559 威望：1000 精华：45 注册：2003/12/30 16:34:32

Post By：2010/7/26 7:46:02 Post IP：61.49.254.52[只看该作者]

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

如果在1分钟周期做，会在指定时间发送邮件。

beitang

小大 3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：论坛游侠帖子：138 积分：947 威望：0 精华：0 注册：2010/7/20 12:13:13

Post By：2010/7/26 8:49:45 Post IP：113.116.216.5[只看该作者]

谢谢！

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

有些是1小时线上的。

admin

小大 4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC

加好友

发短信

等级：管理员帖子：7302 积分：32559 威望：1000 精华：45 注册：2003/12/30 16:34:32

Post By：2010/7/26 17:05:46 Post IP：61.49.254.52[只看该作者]

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

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