Warning: file_get_contents(/data/phpspider/zhask/data//catemap/1/vb.net/17.json): failed to open stream: No such file or directory in /data/phpspider/zhask/libs/function.php on line 167

Warning: Invalid argument supplied for foreach() in /data/phpspider/zhask/libs/tag.function.php on line 1116

Notice: Undefined index: in /data/phpspider/zhask/libs/function.php on line 180

Warning: array_chunk() expects parameter 1 to be array, null given in /data/phpspider/zhask/libs/function.php on line 181
Vb.net Visual Basic电子邮件系统密件抄送邮件_Vb.net_Visual Studio 2010 - Fatal编程技术网

Vb.net Visual Basic电子邮件系统密件抄送邮件

Vb.net Visual Basic电子邮件系统密件抄送邮件,vb.net,visual-studio-2010,Vb.net,Visual Studio 2010,我正在制作visual basic电子邮件软件此软件发送附件文件和邮件我想发送邮件许多公司我正在添加到该领域,但我想添加密件抄送和抄送邮件系统也包括,但它不知道我如何为此编码…如果有人对此有很好的认识,请给我一个想法。。。。 或任何其他方式添加多个邮件系统与附件的文件简历文件。。。。我还需要知道如何添加过滤器,有人不会添加任何其他格式的文件来发送。但我主要需要知道如何在vb和CC中添加BCC盲拷贝系统。 Imports System.Net Imports System.Net.Mail Pr

我正在制作visual basic电子邮件软件此软件发送附件文件和邮件我想发送邮件许多公司我正在添加到该领域,但我想添加密件抄送和抄送邮件系统也包括,但它不知道我如何为此编码…如果有人对此有很好的认识,请给我一个想法。。。。 或任何其他方式添加多个邮件系统与附件的文件简历文件。。。。我还需要知道如何添加过滤器,有人不会添加任何其他格式的文件来发送。但我主要需要知道如何在vb和CC中添加BCC盲拷贝系统。
Imports System.Net
Imports System.Net.Mail

Private mpMessage As MailMessage = Nothing
Private mpSMTPSvr As SmtpClient = Nothing

'------------------------------------------------------------------------
'-> Send The Message
'------------------------------------------------------------------------
MailerHost = "Addrss-of-your-emailer-host-server"
mpMessage = New System.Net.Mail.MailMessage()
mpMessage.Body = "Message body text goes here"
If Trim(SenderNameValue) <> "" Then
  mpMessage.From = New System.Net.Mail.MailAddress("senderemail@hotmail.com", SenderNameValue)
  mpMessage.Sender = New System.Net.Mail.MailAddress("senderemail@hotmail.com", SenderNameValue)
Else
  mpMessage.From = New System.Net.Mail.MailAddress("senderemail@hotmail.com", "Name_Unspecified")
  mpMessage.Sender = New System.Net.Mail.MailAddress("senderemail@hotmail.com", "Name_Unspecified")
End If
mpMessage.Priority = System.Net.Mail.MailPriority.High
mpMessage.Subject = "[WEB-REPONSE] - Correspondence via Website response form."
mpMessage.To.Add(Trim("recipient@yahoo.com"))
mpMessage.CC.Add(Trim("secretary@yahoo.com"))
mpMessage.BCC.Add(Trim("manager@yahoo.com"))
Try
  mpSMTPSvr.Send(mpMessage)
  SendStandardCommunicae = True
  Catch ex As Net.Mail.SmtpException
  ReturnErrorid = eEML_NETWORKERRORSENDINGEMAIL
  ReturnErrorText = "A network error occurred whilst trying to send your message, please check your details for syntax errors and try again later.<br />If the error occurs consistently please contact the site administrator or use an alternative method of contact.<br /><br />"
  ReturnErrorText = ReturnErrorText & "Extra Information:" & ex.Message
End Try