ارسال ایمیل انبوه

[pedram_ns]

با سلام
من با کد زیر ایمیل تکی میفرستم. حالا باید چه تغییری در اون بدم تا بتونم چند ایمیل رو بصورت bcc بفرستم؟

با تشکر


Dim obj As New SmtpClient
Dim Mailmsg As New MailMessage
Mailmsg.To.Clear()

Dim mto, mfrom, subject, mailserver, password, htmltext As String

mto = email.text

mfrom = "Info@mywebsite.com"
subject = subjectmessage.text
mailserver = "mail.mywebsite.com"
password = "111111"

htmltext = ("")
Mailmsg.To.Add(New MailAddress(mto))
Mailmsg.From = New MailAddress(mfrom)
Mailmsg.Subject = subject.text
Mailmsg.BodyEncoding = System.Text.Encoding.UTF8
Mailmsg.IsBodyHtml = True
obj.Host = mailserver
Dim basicAuthenticationInfo As New System.Net.NetworkCredential(mfrom, password)
obj.UseDefaultCredentials = False
obj.Credentials = basicAuthenticationInfo
Mailmsg.Body = htmltext
Mailmsg.IsBodyHtml = True

obj.Send(Mailmsg)

[C#.net]

در یک حلقه به پراپرتی زیر مقدار بدید


Mailmsg.Bcc.Add(something...)