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

Я пытаюсь отправить электронную почту асинхронно, и она работает нормально, пока к сообщению электронной почты не прикреплен 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
Источник

3 ответа

Решение

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

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

Источник

Вы должны поместить свои 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.

ура

Источник

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

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

Источник
Другие вопросы по тегам