繁体   English   中英

使用密件抄送发送邮件

[英]Send mail with Bcc

我想通过vb.net发送带有BccBcc )的邮件,但我不知道该怎么做。

这是我的代码:

Function send_MAIL() As Boolean

    Dim smtpServer As New SmtpClient()
    Dim mail As New MailMessage()
    'credenziali per accedere
    smtpServer.Credentials = New Net.NetworkCredential("lllll@live.it", "******")
    'porta del tuo HOST di posta 
    smtpServer.Port = 587
    'SMTP del  HOST di posta 
    smtpServer.Host = "smtp.live.com"
    'SSL
    smtpServer.EnableSsl = True
    'Creiamo la mail da spedire
    mail = New MailMessage()
    'Inserisci l'indirizzo di posta che verrà visualizzato dal destinatario
    mail.From = New MailAddress("ddddd@live.it")
    'Inserisci l'email del destinatario
    mail.To.Add("pppppp@hotmail.it")
    mail.To.Add("llllll@live.it")
    'Inserisci l'oggetto
    mail.Subject = "OGGETTO"
    'testo dell'email 
    mail.Body = "email prova"
    smtpServer.Send(mail)
    Return True
End Function

您只需使用Bcc成员。

mail.Bcc.Add("mailtobcc@domain.com")

我用这个:

Dim c As Net.Mail.MailAddress = New Net.Mail.MailAddress(dirección)
myMsg.Bcc.Add(c)

其中“dirección”是有效的电子邮件地址

希望这可以帮到你。 再见!

暂无
暂无

声明:本站的技术帖子网页,遵循CC BY-SA 4.0协议,如果您需要转载,请注明本站网址或者原文地址。任何问题请咨询:yoyou2525@163.com.

 
粤ICP备18138465号  © 2020-2024 STACKOOM.COM