Foxtable(狐表)用户栏目专家坐堂 → 哪个邮箱可以用FT内置的邮件发送系统?


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

主题:哪个邮箱可以用FT内置的邮件发送系统?

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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/22 9:11:00 [显示全部帖子]

1、如果用QQ邮箱,你要设置下

 

http://jingyan.baidu.com/article/4f7d5712b1ac7c1a201927da.html

 

2、SSL这样处理

 

Dim client As New System.Net.Mail.SmtpClient("smtp.outlook.office365.com", 587)
client.EnableSsl = True 'SSL


client.Credentials = New System.Net.NetworkCredential("455189993@qq.com", "helen6849338.")
client.DeliveryMethod = System.Net.Mail.SmtpDeliveryMethod.Network
Dim message As New System.Net.Mail.MailMessage()

message.From = new System.Net.Mail.MailAddress("455189993@qq.com","别名")

'message.To.Add(new System.Net.Mail.MailAddress("2450314695@qq.com","人名"))
message.To.Add("2450314695@qq.com")
message.Subject = "邮件测试"
message.BodyEncoding = System.Text.Encoding.UTF8

Dim content As String

content &= "这是文字" & vbcrlf
content &= "也是文字"

message.Body = content

Try
    client.Send(message)
    msgbox("发送成功")
Catch ex As Exception
    msgbox("发送失败:" & ex.message)
End Try


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


加好友 发短信
等级:超级版主 帖子:13837 积分:69650 威望:0 精华:0 注册:2016/11/1 14:42:00
  发帖心情 Post By:2016/12/22 10:13:00 [显示全部帖子]


 回到顶部