使用QQ邮箱发送邮件

如果你使用的是QQ邮箱，需要按以下步骤设置才能使用MainSender发送邮件：

1、QQ邮箱的其POP3和SMTP服务默认是关闭的，你需要开启：

http://service.mail.qq.com/cgi-bin/help?subtype=1&id=28&no=166

2、QQ邮箱的密码和QQ密码不同，需要获取授权码作为邮箱密码：

http://service.mail.qq.com/cgi-bin/help?subtype=1&&id=28&&no=1001256

3、MailSender的EnableSsl属性设置为True。

示例代码

Dim m As New MailSender
m.Host = "smtp.qq.com"
m.EnableSsl = True '必须将EnableSsl属性设置为True
m.Account = "apple@qq.com"
m.Password = "c409ddc47aa74638" '注意这不是QQ密码,是授权码
m.From = "apple@qq.com"
m.To = "1234567@qq.com"
m.Title = "李总明天来北京"
m.Content = "航班号是gz1234,上午11点到达,请注意接机"
m.Send()