MS

GUIs.ZooFlow/Modules/Globix/ClassFilehandle.vb

@@ -15,7 +15,6 @@ Public Class ClassFilehandle
     Private ReadOnly FileEx As File
     Private ReadOnly Email As Email2
     Private ReadOnly UserFiles As ClassUserFiles
-
     Private ReadOnly TempFiles As New List(Of String)
 
     Public Sub New(pLogConfig As LogConfig)
@@ -126,15 +125,14 @@ Public Class ClassFilehandle
                 Else
                     oMSG = "Shortcuts cannot be droppped!"
                 End If
-                Dim oMsgBox As New frmDialog(oMSG, "FileHandle", frmDialog.DialogType.Warning)
-                oMsgBox.ShowDialog()
+                MsgBox(oMSG, MsgBoxStyle.Information, "Index Load")
+
                 Return False
             End If
 
             Return UserFiles.Insert_GI_File(oTempFilePath, pHandletype)
         Catch ex As Exception
-            Dim oMsgBox As New frmDialog(ex.Message, "Decide_FileHandle", frmDialog.DialogType.Error)
-            oMsgBox.ShowDialog()
+            MsgBox(ex.Message, MsgBoxStyle.Critical, "Unexpected error in Decide_FileHandle")
 
             Return False
         End Try