CCとBCCが、私はそれらの1

Question

Imports System.Net.Mail 
Imports System.IO 
Public Class Form1 
Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load 
    Try 
     Dim mail As New MailMessage() 
     Dim SmtpServer As New SmtpClient(My.Settings.smtpserver) 
     mail.From = New MailAddress(My.Settings.from) 
     mail.[To].Add(My.Settings.destination) 
     mail.Subject = "Program" 
     mail.Body = "Hi this is a msg form .net application" 

     Dim path As String = My.Settings.desktop 
     Dim dir As New DirectoryInfo(path) 
     Dim filesInDirectory As FileInfo() = dir.GetFiles() 
     Dim attach As System.Net.Mail.Attachment 
     For Each file In filesInDirectory 
      attach = New System.Net.Mail.Attachment(file.FullName) 
      mail.Attachments.Add(attach) 
     Next 

     SmtpServer.Port = My.Settings.port 
     SmtpServer.Credentials = New 
System.Net.NetworkCredential(My.Settings.username, My.Settings.password) 
     SmtpServer.EnableSsl = True 

     SmtpServer.Send(mail) 
     MsgBox("Sent Successfuly!", MsgBoxStyle.Information, "Send!") 

     mail.CC.Add(My.Settings.CC) 
     mail.Bcc.Add(My.Settings.BCC) 

    Catch ex As Exception 
     MsgBox("Failed Sending Email!", MsgBoxStyle.Critical, "Failed!") 
    End Try 
    Application.Exit() 
End Sub 

エンドクラス

CCを通してそれを送る傾ける動作していないとBCC iは、CCやBCC経由で送信するカント機能していませんが、私のコードに問題があるのでしょうか？ユーザーはこのccとbccをgmailのように使用することができます。

Answer 1

メールを送信した後、CCとBCCを設定しています。それはあなたの問題だ。あなたのコードは正常に見える、mail.cc上のブレーカーポイントを置くあなたはMail.Subjectを設定しているところまで

 


    mail.CC.Add(My.Settings.CC) 
    mail.Bcc.Add(My.Settings.BCC) 

 

など