टीपीएल अपवाद - मुख्य धागे से कैसे संलग्न करें

एक अवलोकन योग्य संग्रह ObservableCollection है जो .Net में उपलब्ध है। यदि हमारे द्वारा खोले गए थ्रेड में कोई त्रुटि है और यदि हम उन्हें इस ऑब्जर्वेबल कोलेक्शन में जोड़ते हैं, तो यह एक ईवेंट उठाएगा, उस ईवेंट से हम इस त्रुटि को संभाल सकते हैं

 Task.Factory.StartNew(Sub(mainContext)
                                  'Using sw As StreamWriter = File.AppendText("c:/logs/t7.txt")
                                  '    sw.WriteLine("thread=" + Thread.CurrentThread.ManagedThreadId.ToString())
                                  'End Using
                                  HttpContext.Current = mainContext
                                  'Do some operation
                                 End Sub, HttpContext.Current).ContinueWith(Sub(tplException, subContext)
                                                                             HttpContext.Current = subContext
                                                                             If IsNothing(tplException.Exception) Then Exit Sub
                                                                             For Each ex In tplException.Exception.InnerExceptions
                                                                                 MyAppState.Instance.ObservableException.Add(ex)
                                                                             Next

                                                                         End Sub, HttpContext.Current)

संग्रह घोषित करने की आवश्यकता है

 Public WithEvents ObservableException As ObservableCollection(Of Exception)

इवेंट जो अपवाद को संभालने के लिए .Net फ्रेमवर्क द्वारा उठाया जाएगा

Private Sub CollectionChangedHandler(sender As Object, e As NotifyCollectionChangedEventArgs) Handles ObservableException.CollectionChanged
    Dim ex = DirectCast(e.NewItems(0), Exception)
    ExceptionLog.SaveFile(ExceptionLog.ReadExceptionInformationFromException(ex))
End Sub