Foxtable(狐表)用户栏目专家坐堂 → 请问租用的阿里云,如何对外发邮件?


  共有1656人关注过本帖树形打印复制链接

主题:请问租用的阿里云,如何对外发邮件?

帅哥哟,离线,有人找我吗?
苍风霁月
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:703 积分:7029 威望:0 精华:0 注册:2012/11/4 23:10:00
请问租用的阿里云,如何对外发邮件?  发帖心情 Post By:2019/10/20 10:17:00 [只看该作者]

发现把程序放阿里云esc后,无法对外发邮件,把Port改为465也没成功,请问解决办法。谢谢

 回到顶部
帅哥哟,离线,有人找我吗?
苍风霁月
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:703 积分:7029 威望:0 精华:0 注册:2012/11/4 23:10:00
  发帖心情 Post By:2019/10/20 21:51:00 [只看该作者]

请哪些大师空了研究下阿里云ESC邮件发送功能,好像与现在提供的邮件发送案例不一样,没看懂!

https://help.aliyun.com/knowledge_detail/51622.html

 回到顶部
帅哥,在线噢!
有点蓝
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/20 21:57:00 [只看该作者]

写了什么代码发送邮件,贴出来。发送失败提示什么错误?

 回到顶部
帅哥哟,离线,有人找我吗?
苍风霁月
  4楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:703 积分:7029 威望:0 精华:0 注册:2012/11/4 23:10:00
  发帖心情 Post By:2019/10/20 22:13:00 [只看该作者]


图片点击可在新窗口打开查看此主题相关图片如下:test.png
图片点击可在新窗口打开查看
代码如上,如不在ESC中能发邮件,服务放入阿里云,就不得行,没成功也没任何提示。

刚把try catch加上,提示“邮件发送失败”
[此贴子已经被作者于2019/10/20 22:28:51编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  5楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/20 22:26:00 [只看该作者]

阿里云安全组开放465端口了没有?出端口

 回到顶部
帅哥哟,离线,有人找我吗?
苍风霁月
  6楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:703 积分:7029 威望:0 精华:0 注册:2012/11/4 23:10:00
  发帖心情 Post By:2019/10/20 22:37:00 [只看该作者]

开放了465的

图片点击可在新窗口打开查看此主题相关图片如下:set.png
图片点击可在新窗口打开查看


 回到顶部
帅哥哟,离线,有人找我吗?
苍风霁月
  7楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:703 积分:7029 威望:0 精华:0 注册:2012/11/4 23:10:00
  发帖心情 Post By:2019/10/20 22:48:00 [只看该作者]

去掉try catch ,提示:

图片点击可在新窗口打开查看此主题相关图片如下:error.png
图片点击可在新窗口打开查看

请指导是不是下面这个原因引起的?如何解决,谢谢!
https://www.jianshu.com/p/ce505f1a2ae5

[此贴子已经被作者于2019/10/20 23:09:25编辑过]

 回到顶部
帅哥,在线噢!
有点蓝
  8楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:超级版主 帖子:105473 积分:536350 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2019/10/20 23:20:00 [只看该作者]

加上:m.EnableSsl = True '必须将EnableSsl属性设置为True



 回到顶部
帅哥哟,离线,有人找我吗?
苍风霁月
  9楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:703 积分:7029 威望:0 精华:0 注册:2012/11/4 23:10:00
  发帖心情 Post By:2019/10/20 23:32:00 [只看该作者]

加上也没上送成功!是不是这个原因
https://www.jianshu.com/p/ce505f1a2ae5

此主题相关图片如下:error.png
按此在新窗口浏览图片


 回到顶部
帅哥哟,离线,有人找我吗?
苍风霁月
  10楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:三尾狐 帖子:703 积分:7029 威望:0 精华:0 注册:2012/11/4 23:10:00
  发帖心情 Post By:2019/10/20 23:51:00 [只看该作者]


按照上面办法,改用System.Web.Mail.MailMessage(),发送成功!代码如下:

try
    Dim mm As new System.Web.Mail.MailMessage()
    mm.Priority = System.Web.Mail.MailPriority.High '邮件的优先级,分为 Low, Normal, High,通常用 Normal即可
    mm.From = "XXXX@163.com"
    mm.To = "XXXXX@qq.com"
    mm.Subject = "邮件标题"
    mm.BodyFormat = System.Web.Mail.MailFormat.Html
    mm.BodyEncoding = Encoding.UTF8    '邮件正文的编码, 设置不正确, 接收者会收到乱码
    mm.Body = "邮件正文"
    mm.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpauthenticate", "1")  '身份验证
    mm.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendusername", "XXXX@163.com") '邮箱登录账号,这里跟前面的发送账号一样就行
    mm.Fields.Add("http://schemas.microsoft.com/cdo/configuration/sendpassword", "********") '这个密码要注意:如果是一般账号,要用授权码;企业账号用登录密码
    mm.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpserverport", 465)  '端口
    mm.Fields.Add("http://schemas.microsoft.com/cdo/configuration/smtpusessl", "true")  'SSL加密
    System.Web.Mail.SmtpMail.SmtpServer = "smtp.163.com"
    System.Web.Mail.SmtpMail.Send(mm)
    MessageBox.Show("发送成功")
Catch ex As Exception
    MessageBox.Show(ex.message)
End try




 回到顶部