使用autoit发送邮件
调用系统自带的CDO接口可以用SMTP模式发送各大第三方的邮箱,只需要开启POP
Func SendEmail() ;CDO库是Windows系统默认带有的组件。 Local $objEmail = ObjCreate("CDO.Message") With $objEmail ; 设置发件人、收件人和主题 .From = "发件人@163.com" .To = "收件人@163.com" .Subject = "test" ; 设置邮件正文使用html格式,使用 & "<br>" & _ 实现换行 .HtmlBody = "你好." & "<br>" & _ "thank you, thank you very much." & "<br>" & _ "thank you, thank you very much." & "<br>" & _ "再见" ; 添加附件 .AddAttachment("D:\data\dedede.xlsx") ; 设置SMTP服务器配置 .Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusing") = 2 ; cdoSendUsingPort .Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserver") = "smtp.163.com" .Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpserverport") = 465 .Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpusessl") = True ; 设置邮箱登录信息 .Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate") = 1 ; cdoBasic .Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendusername") = "发件人@163.com" .Configuration.Fields.Item("http://schemas.microsoft.com/cdo/configuration/sendpassword") = "授权码,不是登录163邮箱密码" ; 更新配置 .Configuration.Fields.Update() ; 发送邮件 .Send EndWith EndFunc ;==>SendEmail ; 调用发送邮件的函数 SendEmail() MsgBox(0, "Email", "邮件发送成功!")
3/SMTP模式即可
【推荐】编程新体验,更懂你的AI,立即体验豆包MarsCode编程助手
【推荐】凌霞软件回馈社区,博客园 & 1Panel & Halo 联合会员上线
【推荐】抖音旗下AI助手豆包,你的智能百科全书,全免费不限次数
【推荐】博客园社区专享云产品让利特惠,阿里云新客6.5折上折
【推荐】轻量又高性能的 SSH 工具 IShell:AI 加持,快人一步
· 本地部署 DeepSeek:小白也能轻松搞定!
· 如何给本地部署的DeepSeek投喂数据,让他更懂你
· 从 Windows Forms 到微服务的经验教训
· 李飞飞的50美金比肩DeepSeek把CEO忽悠瘸了,倒霉的却是程序员
· 超详细,DeepSeek 接入PyCharm实现AI编程!(支持本地部署DeepSeek及官方Dee