EDMI: First version of Updating files by replacing them!

GUIs.ZooFlow/ApplicationEvents.vb

@@ -2,6 +2,7 @@
 Imports DigitalData.Modules.EDMI.API
 Imports DigitalData.Modules.Logging
 Imports DigitalData.Modules.Logging.LogConfig
+Imports Microsoft.VisualBasic.ApplicationServices
 
 Namespace My
     ' Für MyApplication sind folgende Ereignisse verfügbar:
@@ -18,6 +19,8 @@ Namespace My
         Private CommonAppDataPath As String = Windows.Forms.Application.CommonAppDataPath
         Private StartupPath As String = Windows.Forms.Application.StartupPath
 
+
+
         Public Sub App_Startup() Handles Me.Startup
             Dim oLogConfig As New LogConfig(LogPath:=PathType.AppData, CompanyName:="Digital Data", ProductName:="ZooFlow", FileKeepRangeInDays:=30) With {.Debug = True}
 
@@ -68,6 +71,13 @@ Namespace My
 
         Public Sub App_Shutdown(sender As Object, e As EventArgs) Handles Me.Shutdown
             _Logger.Debug("Shutting down Client Suite..")
+            Application.Sidebar.UnregisterSidebar()
+        End Sub
+
+        Private Sub MyApplication_UnhandledException(sender As Object, e As UnhandledExceptionEventArgs) Handles Me.UnhandledException
+            Application.Sidebar.UnregisterSidebar()
+            _Logger.Warn("Unhandled exception occurred: [{0}]", e.Exception.Message)
+            _Logger.Error(e.Exception)
         End Sub
     End Class
-End Namespace
+End Namespace