我这样测试没问题,请确保你账号密码正确。
Dim m As New MailSender'm.port = "587"m.EnableSsl = Truem.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.Sendmsgbox(123)