mailsender - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

为什么我用按照帮助文件改mailsender 发送邮件发不出去，qq，网易，新浪邮箱都试过了。

Dim m As New MailSender

m.Host = "smtp.21cn.net"

m.Account = "cauclhl@sina.com"

m.Password = "xxx"

m.From = "cauclhl@sina.com"

m.To = "799415797@qq.com"

m.Title = "测试"

m.C

m.SendAsync()

不可能，参考

Dim m As New MailSender
m.Host = "smtp.qq.com"
m.Account = "455189993@qq.com"
m.Password = "helen6849338."
m.From = "455189993@qq.com"
m.To = "765427475@qq.com"
m.Title = "初jkj完成"
m.Content = "附件jkjkj为初稿, 请您审阅!"
'm.AddAttachments("d:\test.xls")
'm.AddAttachments("d:\11.xls") ''如何添加多个附件. 这样只看到最后一个附件而于
m.Send
msgbox(123)

如果使用QQ邮箱，要设置 http://www.foxtable.com/webhelp/scr/3230.htm

您好，再问一下，用mailsender 是不是需要下载电脑版的邮箱啊，我没装邮箱软件，代码确实测试发不出

以下是引用dixiaxiaodan在2018/6/14 9:25:00的发言：
您好，再问一下，用mailsender 是不是需要下载电脑版的邮箱啊，我没装邮箱软件，代码确实测试发不出

测试2楼代码，接收邮箱改成自己的

m.To = "765427475@qq.com"

此主题相关图片如下：捕获.jpg

貌似不行

[此贴子已经被作者于2018/6/14 9:44:32编辑过]

代码没问题，是你电脑或者你网络有问题导致的发送失败。

以下是引用有点甜在2018/6/14 9:58:00的发言：

代码没问题，是你电脑或者你网络有问题导致的发送失败。

好的，谢谢，我回家试试看。

以下是引用有点甜在2018/6/14 9:58:00的发言：

代码没问题，是你电脑或者你网络有问题导致的发送失败。

qq密码改成授权码，增加了这句就好了：m.EnableSsl = True '

主题：mailsender