Fix Filedrop

Global_Indexer/ClassFileDrop.vb

@@ -91,7 +91,8 @@ Public Class ClassFileDrop
                         LOGGER.Info("Attachment File from Outlook could not be created")
                     End If
                 End If
-            ElseIf e.Data.GetDataPresent("FileGroupDescriptor") Then
+            End If
+            If e.Data.GetDataPresent("FileGroupDescriptor") Then
                     Dim oApp As Outlook.Application
                     Try
                         oApp = New Outlook.Application()
@@ -140,8 +141,6 @@ Public Class ClassFileDrop
                     Next
                     Return True
                 'Drop eines Outlook Attachments
-            Else
-                Return False
             End If
         Catch ex As Exception
             MsgBox("Error in Drop-File" & vbNewLine & ex.Message, MsgBoxStyle.Critical)