系统存储不足。服务器响应为:4.5.3收件人太多(AS780090)

时间:2016-05-09 05:44:25

标签: smtp

系统存储不足。服务器响应为:4.5.3收件人太多(AS780090)

第121行:Dim mSmtpClient为新的SmtpClient() 第122行: 第123行:mSmtpClient.Send(mMailMessage)

   Public Function SendMail(ByVal emailto As String, ByVal strtitle As String, ByVal strmsg As String) As String
        ' Try

        Dim mMailMessage As New MailMessage()
        Dim from1 As String = "*******@*****.com"
        ' Set the sender address of the mail message 
        mMailMessage.From = New MailAddress(from1, strtitle)
        ' Set the recepient address of the mail message 
        mMailMessage.To.Add(New MailAddress(emailto, strtitle))
        mMailMessage.Subject = strtitle


        mMailMessage.Subject = strtitle

        'mMailMessage.To.Add(New MailAddress(email).ToString)
        mMailMessage.To.Add(New MailAddress(emailto).ToString)

        ' Set the format of the mail message body as HTML 
        mMailMessage.IsBodyHtml = True
        'mMailMessage.Body = strmsg
        mMailMessage.Body = strmsg


        ' Set the priority of the mail message to normal 
        mMailMessage.Priority = MailPriority.High
        mMailMessage.BodyEncoding = System.Text.Encoding.GetEncoding("windows-1256")
        mMailMessage.SubjectEncoding = System.Text.Encoding.GetEncoding("windows-1256")

        ' Instantiate a new instance of SmtpClient 
        Dim mSmtpClient As New SmtpClient()

        mSmtpClient.Send(mMailMessage)


    End Function

这个错误的解决方案是什么?或者我的代码在哪里错了? 我也添加了代码,请查看我的代码!

1 个答案:

答案 0 :(得分:0)

在一封电子邮件中可以添加的收件人数有一些限制。收件人包括:

  • CC
  • BCC

在gmail中,对于不同的邮件提供商,它的设置为100,其差值为。

如果您在单个电子邮件中发送的ID超过该号码,则会出现此错误