监控后台交易是否正常,想在开盘时和收盘前10分钟,各发一个邮件。程序该如何写?请高手指点,谢谢!
SENDMAIL(CURRENTTIME=090100,'ABC@SINA.COM;XYZ@WEISTOCK.COM','警报','开盘了');
SENDMAIL(CURRENTTIME=145000,'ABC@SINA.COM;XYZ@WEISTOCK.COM','警报','收盘了');
如果在1分钟周期做,会在指定时间发送邮件。
谢谢!
问题是,如果我是间隔3秒轮循的,不就会发很多邮件吗?
有些是1小时线上的。
加全局变量数据库控制,出现警报后置今日的标志位,然后判断标志位控制当天只发一次预警
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
知道了
使用手机监控功能就行了,成交后有推送信息的