如何隐藏群发邮件时收件人的邮箱地址？ - 专家坐堂 - Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

当群发邮件时，怎么设置不让显示收件人的邮箱（以免收件人相互之间看得到）？

这是Foxtable问题？

如果是Outlook问题，我可以回答您：全部收件人使用密件抄送，这样就看不到别的收件人了。

网页邮箱发邮件，应该也可以吧，没有专门测试过，公司用Outlook给多个客户发邮件，这样是可以的。

[此贴子已经被作者于2015/8/28 21:19:02编辑过]

是的，是FOXTABLE问题；

我是指用FOXTABLE群发邮件时如何隐藏收件人的邮箱地址；

有没有老师知道怎么弄？

用MailSender通过程序动态发送

http://www.foxtable.com/help/index.html?n=1404.htm

我会群发邮件，我是问群发邮件时怎么隐藏收件人的邮箱地址；

要不你就把邮件地址写在表里发送的时候从表里调用，不行就再给表设置权限

看来是找不到答案了

非常抱歉，能力有限，找不到mailsender的暗送方法，你看看能不能用第三方控件，用它们的暗送或者密送功能

大概这样，自己套用吧

'Emlt ="111@126.com,222@126.com,333@gmail.com"

'dr("email") = Emlt

Emlt = Emlt.Tolower

Dim s1,flt,s2 As String

Dim Us11 As String = "主题前缀" '主题前缀

Dim Us22 As String = "aaa email" '随便定义

Dim smtp As New System.Net.Mail.SmtpClient("smtp.gmail.com",587)

smtp.UseDefaultCredentials = False

smtp.Credentials = new System.Net.NetworkCredential("gmail账号", "PassWord") '按实

smtp.EnableSsl = 1 '开启SSL验证

'创建邮件

Dim m As New System.Net.Mail.MailMessage()

'发件人邮箱

m.From = new System.Net.Mail.MailAddress("gmail@gmail.com",Us11) '按实

Dim n1 As Integer =Emlt.Indexof(",")

'收件人邮箱

m.To.Add(Emlt.split(",")(0))

'暗送收件人邮箱

If n1 > -1 Then

s2= Emlt.Substring(n1+1)

m.Bcc.Add(s2)

End If

'邮件优先级

m.Priority = 1 'System.Net.Mail.MailPriority.Normal

'主题编码

m.SubjectEncoding = System.Text.Encoding.GetEncoding("UTF-8")

'邮件正文件编码

m.BodyEncoding = System.Text.Encoding.GetEncoding("UTF-8")

m.Subject = "主题"

m.IsBodyHtml = True '主题内容是否HTML格式显示

m.Body = "主题内容"

Dim at As New System.Net.Mail.Attachment(Lano) '附件文件

at.Name = FileSys.GetName(lano)

m.Attachments.Add(at)

smtp.SendAsync(m, Us22)

主题：如何隐藏群发邮件时收件人的邮箱地址？