使用windows服务+SQL存储过程实现某项信息定时自动发送邮件

项目需求:

每日凌晨3点前总结昨天的某项数据,自动发送邮件到指定的邮箱。

实现方法(大致流程):

1、数据总结使用MsSql的存储过程来实现,结合MsSql的自动代理作业,定时凌晨导出数据到某个目录。

2、windows服务定时查询导出的目录里是否有新文件,有新文件则执行发送邮件流程。


代码:

1、Windows服务上报数据的代码(定时器要用System.Timers.Timer,发送邮件的类请自行百度):

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Diagnostics;
using System.Linq;
using System.ServiceProcess;
using System.Text;
using System.IO;
namespace SendEmail
{
    public partial class AutoSendEmail : ServiceBase
    {
        public AutoSendEmail()
        {
            InitializeComponent();
            base.AutoLog = true; // 记录windows事件日志
            base.ServiceName = "自动发送邮件";
        }

        protected override void OnStart(string[] args)
        {
            timer1.Start();
            base.EventLog.WriteEntry("服务器已启动", EventLogEntryType.Information);
        }

        protected override void OnStop()
        {
            timer1.Stop();
            base.EventLog.WriteEntry("服务器已停止", EventLogEntryType.Information);
        }

        private void timer1_Elapsed(object sender, System.Timers.ElapsedEventArgs e)
        {
            Mail mail = new Mail();
            mail.Logs(DateTime.Now.ToString() + "定时器已激活");
            string file = "H:\\Web\\Data\\" + DateTime.Now.ToString("yyyy-MM-dd")+".txt";
            string fileModel = @"导入代金券(新版)
带*号的为必填项
开始日期:格式要求:YYYY-MM-DD,需要在方案的开始和结束日期之间;
结束日期:格式要求:YYYY-MM-DD,需要在方案的开始和结束日期之间;
							
/********/";
            if (File.Exists(file))
            {
                File.WriteAllText(file, fileModel + Environment.NewLine + File.ReadAllText(file, Encoding.GetEncoding("GB2312")), Encoding.GetEncoding("GB2312"));                
                
                mail.AddTo("[email protected]"); // 收件人
                mail.AddCC("[email protected]"); // 抄送人
                mail.Subject = "信息自动上报";
                mail.Content = "信息自动上报,数据详情请查看附件。";
                mail.AddAttchment(file); // 附件
                mail.Send();
                mail.Logs(DateTime.Now.ToString() + "定时器已执行完发送流程");
                FileInfo f = new FileInfo(file);
                f.MoveTo("H:\\Web\\Data\\" + f.Name + "_send" + f.Extension);  //发送成功后把记录文件改名字,防止多次重复发送(方法之一)
            }
            else
            {
                mail.Logs(DateTime.Now.ToString() + "没有检测到需要发送邮件的数据");
            }
        }
    }
}


2、MsSql定时导出的存储过程

ALTER PROCEDURE [dbo].[ExportToExcel]
	 
AS
BEGIN
	 
	SET NOCOUNT ON;
	EXEC sp_configure 'show advanced options',1
	reconfigure
	EXEC sp_configure 'xp_cmdshell',1
	reconfigure
	DECLARE @D VARCHAR(2000)
	SET @D='bcp "select ''序列号(*)'',''密码(*)'',''券面金额(*)'',''开始日期(*)'',''结束日期(*)'' UNION ALL select [CardNum],[CardPwd],CONVERT(VARCHAR(2),[CardPrice]) AS ''CardPrice'',CONVERT(varchar(100),[CardStartDay],23) AS ''CardStartDay'',CONVERT(varchar(100),[CardEndDay],23) AS ''CardEndDay'' from SMS..CardInfo where CardIsActive=1 AND CardActiveDate BETWEEN CONVERT(varchar(100),GETDATE()-1,23)+'' 00:00:00'' AND CONVERT(varchar(100),GETDATE()-1,23)+'' 23:59:59''" queryout H://Web//Data//'+CONVERT(varchar(100), GETDATE(), 23)+'.txt  -t ","  -c -U登录名 -P登录密码'

	exec master..xp_cmdshell @D;
     
	EXEC sp_configure 'show advanced options',1
	reconfigure
	EXEC sp_configure 'xp_cmdshell',0--完成后记得关闭'xp_cmdshell'
	reconfigure
END


3、在MsSql的SQL Server代理中新建一个定时作业,定时执行这个存储过程。



发布了85 篇原创文章 · 获赞 31 · 访问量 26万+

猜你喜欢

转载自blog.csdn.net/5653325/article/details/69803163