.NET SMTP SendAsync с AlternateViews выдает удаленное исключение

Question

Я пытаюсь отправлять электронные письма асинхронно, и это работает нормально, пока к электронному письму не прикреплен AlternateView.Когда есть альтернативный вид, я получаю следующую ошибку:

Cannot access a disposed object. Object name: 'System.Net.Mail.AlternateView'
System.Net.Mail.SmtpException: Failure sending mail. ---> System.ObjectDisposedException: Cannot access a disposed object.

Object name: 'System.Net.Mail.AlternateView'.
   at System.Net.Mail.AlternateView.get_LinkedResources()
   at System.Net.Mail.MailMessage.SetContent()
   at System.Net.Mail.MailMessage.BeginSend(BaseWriter writer, Boolean sendEnvelope, AsyncCallback callback, Object state)
   at System.Net.Mail.SmtpClient.SendMailCallback(IAsyncResult result)

Вот несколько примеров кода:

Dim msg As New System.Net.Mail.MailMessage
msg.From = New System.Net.Mail.MailAddress("me@example.com", "My Name")
msg.Subject = "email subject goes here"

'add the message bodies to the mail message
Dim hAV As System.Net.Mail.AlternateView = System.Net.Mail.AlternateView.CreateAlternateViewFromString(textBody.ToString, Nothing, "text/plain")
hAV.TransferEncoding = Net.Mime.TransferEncoding.QuotedPrintable
msg.AlternateViews.Add(hAV)

Dim tAV As System.Net.Mail.AlternateView = System.Net.Mail.AlternateView.CreateAlternateViewFromString(htmlBody.ToString, Nothing, "text/html")
tAV.TransferEncoding = Net.Mime.TransferEncoding.QuotedPrintable
msg.AlternateViews.Add(tAV)

Dim userState As Object = msg
Dim smtp As New System.Net.Mail.SmtpClient("emailServer")

'wire up the event for when the Async send is completed
 AddHandler smtp.SendCompleted, AddressOf SmtpClient_OnCompleted

 Try
     smtp.SendAsync(msg, userState)
 Catch '.... perform exception handling, etc...
 End Try

И Обратный звонок.....

 Public Sub SmtpClient_OnCompleted(ByVal sender As Object, ByVal e As AsyncCompletedEventArgs)
    If e.Cancelled Then
      'Log the cancelled error
    End If
    If Not IsNothing(e.Error) Then
        'Log a real error....
        ' this is where the error is getting picked up
    End If

    'dispose the message
    Dim msg As System.Net.Mail.MailMessage = DirectCast(e.UserState, System.Net.Mail.MailMessage)
    msg.Dispose()

End Sub

Answer 1

Причина, по которой это не работает, заключается в том, что ваш обработчик OnCompleted вызывается при завершении метода SendAsync(), но, похоже, это происходит до того, как SmtpClient завершит физическую отправку электронной почты по сети (хотя это произойдет только при сетевой доставке, доставка файлов по существу синхронна с SendAsync ()).

Это почти похоже на ошибку в SmtpClient, потому что OnCompleted действительно должен вызываться только тогда, когда сообщение действительно было отправлено.

Answer 2

У меня была очень похожая проблема. То же сообщение об ошибке, но немного другая структура кода. В моем случае я утилизировал объект MailMessage внутри основной функции. К тому времени, когда наступило событие Oncompleted, объект уже исчез.

Посмотрите на свой код после SendAsync, чтобы узнать, освобождаете ли вы объект MailMessage. Например, если вы создаете его внутри оператора использования, то он будет освобожден до того, как асинхронное событие будет запущено.

Answer 3

Вы должны поставить свои Dims на уровне класса, если вы хотите получить доступ к ним в своем обратном вызове.

private msg As System.Net.Mail.MailMessage
private hAV As System.Net.Mail.AlternateView 

private sub yoursub
  msg = new System.Net.Mail.MailMessage(..
  hAV = new ...
end sub

Я предполагаю, что AlternateViews.add просто добавляет ссылку на HAV, объект MSG необходимо распоряжаться, в то время как HAV автоматически утилизируется GC ..

Ваше здоровье