主题：[讨论]今天无论如何都要给后台假死一个解决方案~

楼主：一分钟发一个通知，实在不是太好的办法（邮箱爆满，查邮箱也不方便）。用VBA是好办法。我是图表的，但相信后台也是一样的：

公式每分钟更新一个全局变量（我是在走完K线时更新，一般在每分钟的55秒~05秒之间），VBA每分钟读取这个全局变量（设定在每分钟的30秒时读取），若超过1分钟该变量未更新，就发出邮件（注：可用手机收邮件，或邮箱开通短信通知功能）

楼主，你可以监测下后台死的时候，VBA是否正常，这点我也没经验。

VBA发邮件：

Sub SendMail(Subject,Content)
 Set mail = CreateObject("WWSCommon.SmtpMail")
    with mail
        .SenderName = "程序化交易"
        .SenderAddress = "请输入发件人email地址"
        .Subject = Subject & cdate(date+time)
    end with
    call mail.AddReceiver("MY","请输入收件人email地址")
    call mail.AddTextContent(Content)
    call mail.Sender("smtp.163.com","abc@163.com","123456")
    Set mail = nothing
End Sub

我是从163发给139。老的163支持smtp

然后在需要发邮件的时候，调用SendMail函数