Fix deleting original file error by setting file attributes to normal

2022-04-01 15:28:48 +02:00
parent 136d2a0f45
commit 569c66d764
6 changed files with 202 additions and 144 deletions
--- a/Global_Indexer/frmStart.Designer.vb
+++ b/Global_Indexer/frmStart.Designer.vb
@@ -25,7 +25,14 @@ Partial Class frmStart
        Me.components = New System.ComponentModel.Container()
        Dim resources As System.ComponentModel.ComponentResourceManager = New System.ComponentModel.ComponentResourceManager(GetType(frmStart))
        Me.MenuStrip1 = New System.Windows.Forms.MenuStrip()
+        Me.KonfigurationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.AdministrationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
+        Me.GrundeinstellungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.HistoryIndexierteDateienToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
+        Me.InfoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
        Me.StatusStrip1 = New System.Windows.Forms.StatusStrip()
+        Me.tslblFW = New System.Windows.Forms.ToolStripStatusLabel()
        Me.TimerFolderWatch = New System.Windows.Forms.Timer(Me.components)
        Me.TimerClose3Minutes = New System.Windows.Forms.Timer(Me.components)
        Me.NotifyIcon1 = New System.Windows.Forms.NotifyIcon(Me.components)
@@ -39,13 +46,7 @@ Partial Class frmStart
        Me.MyDataset = New Global_Indexer.MyDataset()
        Me.TableAdapterManager = New Global_Indexer.MyDatasetTableAdapters.TableAdapterManager()
        Me.btnChoosefiles = New System.Windows.Forms.Button()
-        Me.KonfigurationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.AdministrationToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.ToolStripSeparator1 = New System.Windows.Forms.ToolStripSeparator()
-        Me.GrundeinstellungenToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.HistoryIndexierteDateienToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.InfoToolStripMenuItem = New System.Windows.Forms.ToolStripMenuItem()
-        Me.tslblFW = New System.Windows.Forms.ToolStripStatusLabel()
+        Me.TimerCheckDroppedFiles = New System.Windows.Forms.Timer(Me.components)
        Me.MenuStrip1.SuspendLayout()
        Me.StatusStrip1.SuspendLayout()
        CType(Me.MyDataset, System.ComponentModel.ISupportInitialize).BeginInit()
@@ -57,6 +58,40 @@ Partial Class frmStart
        resources.ApplyResources(Me.MenuStrip1, "MenuStrip1")
        Me.MenuStrip1.Name = "MenuStrip1"
        '
+        'KonfigurationToolStripMenuItem
+        '
+        Me.KonfigurationToolStripMenuItem.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
+        Me.KonfigurationToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AdministrationToolStripMenuItem, Me.ToolStripSeparator1, Me.GrundeinstellungenToolStripMenuItem, Me.HistoryIndexierteDateienToolStripMenuItem, Me.InfoToolStripMenuItem})
+        Me.KonfigurationToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.gear_32xLG
+        Me.KonfigurationToolStripMenuItem.Name = "KonfigurationToolStripMenuItem"
+        resources.ApplyResources(Me.KonfigurationToolStripMenuItem, "KonfigurationToolStripMenuItem")
+        '
+        'AdministrationToolStripMenuItem
+        '
+        Me.AdministrationToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.Einstellungen6
+        Me.AdministrationToolStripMenuItem.Name = "AdministrationToolStripMenuItem"
+        resources.ApplyResources(Me.AdministrationToolStripMenuItem, "AdministrationToolStripMenuItem")
+        '
+        'ToolStripSeparator1
+        '
+        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
+        resources.ApplyResources(Me.ToolStripSeparator1, "ToolStripSeparator1")
+        '
+        'GrundeinstellungenToolStripMenuItem
+        '
+        Me.GrundeinstellungenToolStripMenuItem.Name = "GrundeinstellungenToolStripMenuItem"
+        resources.ApplyResources(Me.GrundeinstellungenToolStripMenuItem, "GrundeinstellungenToolStripMenuItem")
+        '
+        'HistoryIndexierteDateienToolStripMenuItem
+        '
+        Me.HistoryIndexierteDateienToolStripMenuItem.Name = "HistoryIndexierteDateienToolStripMenuItem"
+        resources.ApplyResources(Me.HistoryIndexierteDateienToolStripMenuItem, "HistoryIndexierteDateienToolStripMenuItem")
+        '
+        'InfoToolStripMenuItem
+        '
+        Me.InfoToolStripMenuItem.Name = "InfoToolStripMenuItem"
+        resources.ApplyResources(Me.InfoToolStripMenuItem, "InfoToolStripMenuItem")
+        '
        'StatusStrip1
        '
        Me.StatusStrip1.AllowDrop = True
@@ -65,6 +100,13 @@ Partial Class frmStart
        Me.StatusStrip1.Name = "StatusStrip1"
        Me.StatusStrip1.SizingGrip = False
        '
+        'tslblFW
+        '
+        Me.tslblFW.BackColor = System.Drawing.SystemColors.Control
+        Me.tslblFW.Image = Global.Global_Indexer.My.Resources.Resources.bell_go
+        Me.tslblFW.Name = "tslblFW"
+        resources.ApplyResources(Me.tslblFW, "tslblFW")
+        '
        'TimerFolderWatch
        '
        Me.TimerFolderWatch.Interval = 2000
@@ -148,47 +190,6 @@ Partial Class frmStart
        Me.btnChoosefiles.Name = "btnChoosefiles"
        Me.btnChoosefiles.UseVisualStyleBackColor = True
        '
-        'KonfigurationToolStripMenuItem
-        '
-        Me.KonfigurationToolStripMenuItem.Alignment = System.Windows.Forms.ToolStripItemAlignment.Right
-        Me.KonfigurationToolStripMenuItem.DropDownItems.AddRange(New System.Windows.Forms.ToolStripItem() {Me.AdministrationToolStripMenuItem, Me.ToolStripSeparator1, Me.GrundeinstellungenToolStripMenuItem, Me.HistoryIndexierteDateienToolStripMenuItem, Me.InfoToolStripMenuItem})
-        Me.KonfigurationToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.gear_32xLG
-        Me.KonfigurationToolStripMenuItem.Name = "KonfigurationToolStripMenuItem"
-        resources.ApplyResources(Me.KonfigurationToolStripMenuItem, "KonfigurationToolStripMenuItem")
-        '
-        'AdministrationToolStripMenuItem
-        '
-        Me.AdministrationToolStripMenuItem.Image = Global.Global_Indexer.My.Resources.Resources.Einstellungen6
-        Me.AdministrationToolStripMenuItem.Name = "AdministrationToolStripMenuItem"
-        resources.ApplyResources(Me.AdministrationToolStripMenuItem, "AdministrationToolStripMenuItem")
-        '
-        'ToolStripSeparator1
-        '
-        Me.ToolStripSeparator1.Name = "ToolStripSeparator1"
-        resources.ApplyResources(Me.ToolStripSeparator1, "ToolStripSeparator1")
-        '
-        'GrundeinstellungenToolStripMenuItem
-        '
-        Me.GrundeinstellungenToolStripMenuItem.Name = "GrundeinstellungenToolStripMenuItem"
-        resources.ApplyResources(Me.GrundeinstellungenToolStripMenuItem, "GrundeinstellungenToolStripMenuItem")
-        '
-        'HistoryIndexierteDateienToolStripMenuItem
-        '
-        Me.HistoryIndexierteDateienToolStripMenuItem.Name = "HistoryIndexierteDateienToolStripMenuItem"
-        resources.ApplyResources(Me.HistoryIndexierteDateienToolStripMenuItem, "HistoryIndexierteDateienToolStripMenuItem")
-        '
-        'InfoToolStripMenuItem
-        '
-        Me.InfoToolStripMenuItem.Name = "InfoToolStripMenuItem"
-        resources.ApplyResources(Me.InfoToolStripMenuItem, "InfoToolStripMenuItem")
-        '
-        'tslblFW
-        '
-        Me.tslblFW.BackColor = System.Drawing.SystemColors.Control
-        Me.tslblFW.Image = Global.Global_Indexer.My.Resources.Resources.bell_go
-        Me.tslblFW.Name = "tslblFW"
-        resources.ApplyResources(Me.tslblFW, "tslblFW")
-        '
        'frmStart
        '
        Me.AllowDrop = True
@@ -235,4 +236,5 @@ Partial Class frmStart
    Friend WithEvents LabelLoggedIn As DevExpress.XtraBars.BarStaticItem
    Friend WithEvents LabelVersion As DevExpress.XtraBars.BarStaticItem
    Friend WithEvents RibbonMiniToolbar1 As DevExpress.XtraBars.Ribbon.RibbonMiniToolbar
+    Friend WithEvents TimerCheckDroppedFiles As Timer
 End Class