以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  阿里云如何配置邮件服务器，发送邮件  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=138149)
--  作者：xluoping
--  发布时间：2019/7/23 23:16:00
--  阿里云如何配置邮件服务器，发送邮件
阿里云没有开放25端口，如何配置smtp 发送邮件

Dim client As New System.Net.Mail.SmtpClient()
client.Host = "120.25.244.201"      \'发件箱
client.port = 465
client.Credentials = New System.Net.NetworkCredential("xluog","jhy85ggh#")   \'发件账号和密码
client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network
Dim message As New System.Net.Mail.MailMessage
message.From = new System.Net.Mail.MailAddress("mark@anyinet.net")   \'发件邮箱
message.To.Add("398699@qq.com")
message.Subject = "邮件标题"
message.BodyEncoding = System.Text.Encoding.UTF8
message.IsBodyHtml = True
Dim body As String = "<html><body>内容</body></html>"
Dim content As String = "<a href=\'http://www.qq.com\'>打开 qq</a>"
message.Body = body.Replace("内容", content)
Try
    \'client.Send(message)
    client.SendAsync(message,"dfdfsdfsdf")
  MessageBox.Show("成功")
Catch ex As Exception
    MessageBox.Show("失败")
End Try
--  作者：有点蓝
--  发布时间：2019/7/24 8:39:00
--  
使用MailSender有没有问题？http://www.foxtable.com/webhelp/topics/1404.htm
没开放那就去阿里云后台开放不就行了
[此贴子已经被作者于2019/7/24 8:39:00编辑过]
--  作者：xluoping
--  发布时间：2019/7/24 10:50:00
--  
阿里云  465 端口 是开放的 端口， 是SSL加密发送，请问如何设置发送？
--  作者：有点蓝
--  发布时间：2019/7/24 11:21:00
--  
比如：http://www.foxtable.com/webhelp/topics/3230.htm