zoukankan      html  css  js  c++  java
  • EDM营销算法:python自动批量发邮件

    EDM营销:全称Email Direct Marketing,即电子邮件营销。企业可以通过使用EDM软件向目标客户发送EDM邮件,建立同目标顾客的沟通渠道,向其直接传达相关信息,用来促进销售。EDM软件有多种用途,可以发送电子广告、产品信息、销售信息、市场调查、市场推广活动信息等。

    身为一名会修电脑的数据分析师,总是要想着怎样把公司电脑搞坏,顺便给公司创造点价值

    刚好python有个

    import smtplib
    

    因此,就用python3.4来写这个代码

    首先一个最简单的邮件发送的代码是这样子的,定义一个函数:

    1 # 协议服务器地址、发件方邮箱前缀、发件方邮箱密码、收件方邮箱、信件标题、内容
    2 def send_email(SMTP_host, from_account, from_passwd, to_account, subject, content):
    3 def send_email(协议服务器, 发件人邮箱, 发件人邮箱密码, 收件人邮箱, 邮件标题, 邮件内容):

    解析服务器地址,每个邮箱的服务器地址都不一样,一定要根据发件方的邮箱类型来选择服务器地址例如:

    # 协议服务器地址
    # smtp.163.com 
    # smtp.21cn.com
    # smtp.sina.com.cn
    # smtp.sohu.com
    # smtp.126.com
    # smtp.qq.com 
    

    服务器的的端口也不一样,一般都是端口25,只有qq的是465或者587

    加载服务器:

    email_client = smtplib.SMTP(SMTP_host,25)
    

    账号密码登录:

    email_client.login(from_account, from_passwd)
    

    将邮件的文本信息搞进来,换点编码,中间的'plain'是文本,中间可以是html,那么你的内容content就要写成网页形式<b>...</b>:

    msg = MIMEText(content, 'plain', 'utf-8')
    

    邮件寄出去不是还有谁谁谁寄的么,就是下面的这个,标题、发件人、收件人,收发邮件人名的格式啊,搞进去:

    from_title = from_account + "<" + from_account + "@" + from_postfix + ">"

    msg['Subject'] = Header(subject, 'utf-8')
    msg['From'] = from_account
    msg['To'] = to_account

    寄出去:

        email_client.sendmail(from_account, to_account, msg.as_string())
    
        email_client.quit()
    

    记得关闭邮件

    这样子一个很简单的邮件发送系统就出来了

    看看主函数:

    if __name__ == "__main__":
        send_email("smtp.163.com","xxxxx@163.com","password","xxxxx@126.com","test","hellow")

    完整的简单发邮件代码:

     1 import smtplib
     2 from email.mime.text import MIMEText
     3 from email.header import Header
     4 
     5 
     6 def send_email(SMTP_host, from_account, from_passwd, to_account, subject, content):
     7     email_client = smtplib.SMTP(SMTP_host)
     8     email_client.login(from_account, from_passwd)
     9     # create msg
    10     msg = MIMEText(content, 'plain', 'utf-8')
    11     msg['Subject'] = Header(subject, 'utf-8')  # subject
    12     msg['From'] = from_account
    13     msg['To'] = to_account
    14     email_client.sendmail(from_account, to_account, msg.as_string())
    15 
    16     email_client.quit()
    17 
    18 if __name__ == "__main__":
    19     send_email("smtp.163.com","xxxxx@163.com","password","xxxxx@126.com","test","hellow")

    --------------------------------------我是快乐的分割线--------------------------------------

    上面的那个发邮件的是很简单很简单的,没有批量,没有详细解说,我是不会满意这样的东西,那么,看我神一样的代码

    首先,你们要注意到,qq邮箱发邮件有一个很重要的BUG

    如果没有解决那么QQ邮箱无法登陆

    为什么一定需要QQ邮箱呢?

    因为!

    用这个服务器QQ只接受来自QQ的邮件,163以及其他的他都不接受!!!

    所以一定要用QQ邮箱

    打开QQ邮箱--设置--账户

    一定要开启下面那两个服务,因为开启这两个服务才能使用QQ邮箱发

    要发短信的,发完点击我已发送,QQ会给一个16位的字母给你

    注意注意注意注意注意注意注意注意注意注意,这个才是QQ邮箱发邮件的密码密码密码密码密码密码密码密码密码密码密码密码密码密码密码密码密码密码密码

    好,得到这个密码后,我再将其他163的邮箱放进来

    因为单个邮箱每天上限200个,发200肯定被封,你不希望自己的邮箱被封吧

    所以要多个邮箱发

    而且是发给多个用户,那么新建两个excel表格,打开读取里面的账号密码:

     1 from openpyxl import load_workbook
     2 try:
     3             # 读取发件人邮箱
     4             wb = load_workbook(filename=r'../fromemail.xlsx')  ##读取路径
     5             ws = wb.get_sheet_by_name("Sheet1")  ##读取名字为Sheet1的sheet表
     6 
     7             # 建立邮箱账号密码数组
     8             fromemail_qqaccount = []
     9             fromemail_qqpasswd = []
    10             fromemail_othaccount = []
    11             fromemail_othpasswd = []
    12 
    13             for row_A in range(2, 100):  ## 遍历第2行到100行
    14                 qqacc = ws.cell(row=row_A, column=1).value  ## 遍历第2行到100行,第1列
    15                 qqpas = ws.cell(row=row_A, column=2).value  ## 遍历第2行到100行,第2列
    16                 othac = ws.cell(row=row_A, column=3).value  ## 遍历第2行到100行,第3列
    17                 othpa = ws.cell(row=row_A, column=4).value  ## 遍历第2行到100行,第4列
    18                 if qqacc:
    19                     fromemail_qqaccount.append(qqacc)
    20                     fromemail_qqpasswd.append(qqpas)
    21                 if othac:
    22                     fromemail_othaccount.append(othac)
    23                     fromemail_othpasswd.append(othpa)
    24 
    25                 # 判断是否有qq邮箱,如果没有则退出程序
    26                 if len(fromemail_qqaccount) == 0:
    27                     input('没有qq邮箱或者qq邮箱写入的格式不对,请插入或改正...')
    28                     exit()
    29 
    30             # 读取收件人邮箱
    31             wb = load_workbook(filename=r'../toemail.xlsx')  ##读取路径
    32             ws = wb.get_sheet_by_name("Sheet1")  ##读取名字为Sheet1的sheet表
    33 
    34             # 建立收件人邮箱账号数组
    35             toemail_account = []
    36             for row_B in range(2, 10000):  ## 遍历第2行到10000行
    37                 emaacc = ws.cell(row=row_B, column=1).value  ## 遍历第2行到10000行,第1列
    38                 if emaacc:
    39                     toemail_account.append(emaacc)
    40         except:
    41             input('写入excel的格式不对,请查证...')
    42             exit()

    我的excel格式是这样子的:

    这里就不解释啦,读取excel我以前的博文就有详细解释

    那么内容content我也写进了txt记事本里面:

    第一行是标题,后面是内容代码如下:

     1         try:
     2             file = open('../content.txt', 'r')
     3             data = file.read().split('
    ')
     4             subject = '标题'
     5             content = '正文'
     6             if data[0] != '':
     7                 for j in range(0, len(data)):
     8                     if j == 0:
     9                         # 邮件标题
    10                         subject = data[0]
    11                     elif j > 0:
    12                         if j == 1:
    13                             # 邮件正文
    14                             content = data[1]
    15                         if j > 1:
    16                             content = str(content) + '
    ' + data[j]
    17             else:
    18                 pass
    19             file.close()
    20         except:
    21             input('写入txt的格式不对,请改正...')
    22             exit()

    如果标题和内容是空的,那么我就自己给一个标题和内容:

                subject = '标题'
                content = '正文'
    

    因为涉及到换行写入,所以有:

    content = str(content) + '
    ' + data[j]
    

    好滴,这些东西统统加进去,感觉这个EDM系统做得不错了

    但是但是,呵呵哒,突然发现登录的时候直接写邮箱会出现错误,也就是这样子:,但是还有,我要发图片怎么办

    我把图片存到pic文件夹

    发图片只能是用html来写,也就是我前文写到的html格式

    那么函数要写成:

    1 #登录之前不变...
    2 email_client.login(from_account, from_passwd)
    3 msg = MIMEMultipart('related')
    4 fp = open('../pic/图片.jpg', 'rb')
    5         msgImage = MIMEImage(fp.read())
    6         msgImage.add_header('Content-ID', 'weekly')
    7         msg.attach(msgImage)
    8         fp.close()
    9 msg.attach(MIMEText("<b>"+content+"</b>" + "<br><img src="cid:weekly">", 'html', 'utf-8'))

    嗯,这样子就可以发图片了:

    好滴,但是前面有提到qq邮箱只能用qq邮箱来发

    那么我写了一个想法

    当邮箱是qq邮箱的时候只能用qq邮箱,出错了退出程序

    当邮箱不是qq邮箱的时候用其他邮箱来发,出错了再用QQ邮箱来发,再出错就退出程序

    那么就准备了一大堆邮箱,循环发,首先判断是不是qq邮箱:

                    if 'qq' in toemail_account[i]:
                        print('用了qq邮箱...')
                        # 定义协议地址
                        SMTP_host = 'smtp.qq.com'
    
                        # 取得@前面的东西
                        from_account = re.compile(r'(.*)@(.*)').search(fromemail_qqaccount[int(count_1) - 1]).group(1)
                        # 取得@后面的东西,等同于下面的语句
                        # from_postfix = re.compile(r'(.*)@(.*)').search(fromemail_qqaccount[i]).group(1)
                        from_postfix = 'qq.com'
    
                        # 密码
                        from_passwd = fromemail_qqpasswd[int(count_1) - 1]
                        # print('读取第count_1 - 1个qq的账号和密码')
    
                        # 收件人地址
                        to_account = toemail_account[i]
    
                        # print('用第count_1 - 1个qq的账号和密码发送邮件')
                        send_email(SMTP_host, from_account, from_passwd, to_account, subject, content)

    这是很简单的判断读取excel的邮箱的东西啦,不多说

    要说的是我要循环利用发件人的邮箱,那么就要有个判断,当循环到头的时候要重新循环,所以就有了那个count_1,最主要的是在这里:

    1 if count_1 % int(len(fromemail_qqaccount)) == 0:
    2     # 循环够了,要初始化count_1
    3     count_1 = 1
    4 else:
    5     count_1 = count_1 + 1

    整除即可

    如果收件人不是qq邮箱,那么来:

     1 else:
     2 # 收件人地址
     3 to_account = toemail_account[i]
     4 # 取得地址协议
     5 if '163' in toemail_account[i]:
     6     SMTP_host = 'smtp.163.com'
     7 elif 'sina' in toemail_account[i]:
     8     SMTP_host = 'smtp.sina.com.cn'
     9 elif '126' in toemail_account[i]:
    10     SMTP_host = 'smtp.126.com'
    11 elif 'sohu' in toemail_account[i]:
    12     SMTP_host = 'smtp.sohu.com'
    13 
    14 # 取得@前面的东西
    15 from_account = re.compile(r'(.*)@(.*)').search(fromemail_othaccount[int(count_2) - 1]).group(1)
    16 # 取得@后面的东西,等同于下面的语句
    17 from_postfix = from_postfix = re.compile(r'(.*)@(.*)').search(fromemail_othaccount[int(count_2) - 1]).group(2)
    18 # 密码
    19 from_passwd = fromemail_othpasswd[int(count_2) - 1]
    20 # print('读取第count_2 - 1个邮箱的账号和密码')
    21 
    22 # print('用第count_2 - 1个邮箱的账号和密码发送邮件')
    23 send_email(SMTP_host, from_account,  from_passwd, to_account, subject, content)
    24 if count_2 % int(len(fromemail_othaccount)) == 0:
    25     # 循环够了,要初始化count_2
    26     count_2 = 1
    27 else:
    28     count_2 = count_2 + 1

    这样子这个程序挺像样子了

    但是!

    我是数据分析师

    我很追求完美

    万一中间程序断了怎么办,我怎么知道哪些人发了邮件哪些人没发?

    呵呵哒,创建一个finish.txt,每发一个保存一个:

     1     #记录下已经发送的邮件
     2     save_finish = '../finish.txt'
     3     read_finish = open(save_finish, 'r').read()
     4     txt_finish = str(read_finish)
     5 
     6     # 以写入的方式打开txt,在上面记录的内容后面继续添加新内容
     7     file_finish = open(save_finish, 'w')
     8     txt_finish = str(txt_finish) + '
    ' + str(to_account)
     9     file_finish.write(txt_finish)
    10     file_finish.close()

    最后成功运行:

    --------------------------我是快乐的分割线---------------------------

    EDM营销,满满的利润来了

    最后为什么没有贴出完整代码,因为商业机密啊

    我是收了钱的啊

    思路都给了

    还不满足啊

    要不你可以去买收钱的啊

    https://help.aliyun.com/document_detail/29421.html

  • 相关阅读:
    Oracle创建表、修改表、删除表、约束条件语法
    Oracle中字符串截取常用方法总结
    Oracle 触发器(一)
    Oracle 触发器(二)
    Ajax-01
    Entity Framework-04
    Entity Framework-03
    Entity Framework-02
    Entity Framework-01
    DML、DCL、DDL
  • 原文地址:https://www.cnblogs.com/TTyb/p/5768727.html
Copyright © 2011-2022 走看看