主题：发送邮件问题

1参数“addresses”不能是空字符串。

 参数名: addresses

For Each dr As DataRow In DataTables("通讯录").DataRows

    Dim m As New MailSender

    m.Host = "smtp.qq.com"

    m.EnableSsl = True '必须将EnableSsl属性设置为True

    m.Account = "389****"

    m.Password = "      *******" '注意这不是QQ密码,是授权码

    m.From = "389***@qq.com"

 

    m.Send

Next