主题：[求助]快崩溃死了，邮件发不出去，但别人能用同样的软件能发....

这样修改看看：

Dim m As New MailSender
m.Host = "smtp.qq.com"
m.Account = "lin_hailun@qq.com"
m.Password = "helen6849338."
m.AddReceiver(lin_hailun@qq.com)
m.To = "276544070@qq.com"
m.Title = "98789jjj888"
m.C
m.Send
msgbox("发送完毕")

我搞错了：
 
Dim m As New MailSender
m.Host = "smtp.qq.com"
m.Account = "lin_hailun@qq.com"
m.Password = "helen6849338."
m.From = “lin_hailun@qq.com“  '发件人
m.AddReceiver(”276544070@qq.com“） '换个方式添加收件人
m.Title = "98789jjj888"
m.C
m.Send
msgbox("发送完毕")

我以前遇到过一次，直接用to发不了，用AddReceiver能发。