2011-12-15 31 views
2

我正在開發中,我發郵件給多個用戶如下在BCC發送郵件給多個用戶不能正常工作

Dim users(20) As String 

     users(0) = "[email protected]" 
     users(1) ="[email protected]" 
     users(2) = "[email protected]" 
     users(3) = "[email protected]" 
     users(4) = "[email protected]" 
     users(5) = "[email protected]" 
     users(6) = "[email protected]" 
     users(7) = "[email protected]" 
     users(8) = "[email protected]" 
     users(9) = "[email protected]" 
     users(10) = "[email protected]" 


    For i = 0 To 10 
     em.Bcc.Add(users(i)) 
     or 
      em.Bcc.Add(New MailAddress (users(i))) 

     Next 

     mailClient.Send(em) 

一個項目,但它發送電子郵件到只有一個用戶我也試過

Dim sendto As String 
     sendto = Nothing 

     For i = 0 To 10 
      sendto = sendto + users(i) + "," 
     Next 
    em.Bcc.Add(sendto) 

仍然沒有工作代碼中出現什麼問題 我使用的是asp.net和vb。

+0

你在哪裏添加的主要接受者? – 2011-12-15 13:23:53

+0

@George我不知道什麼是主要收件人。我想發送數以千計的密件抄送電子郵件。 – 2011-12-16 05:15:43

回答

1

您的代碼應該看起來更像是這樣的:

Sub SendToMany() 
    'create the mail message 
    Dim mail As New MailMessage() 

    mail.From = New MailAddress("[email protected]", "Ashok P") 

    mail.To.Add("[email protected]") 

    mail.Bcc.Add("[email protected]") 
    mail.Bcc.Add("[email protected]") 

    'set the content 
    mail.Subject = "This is an email" 
    mail.Body = "this is the body content of the email." 

    'send the message 
    Dim smtp As New SmtpClient(youmailserver) 'dont forget to include username/password via networkcredentials 
    smtp.Send(mail) 
End Sub 'MultipleRecipients