fix file access error and illegal path error

This commit is contained in:
Jonathan Jenne
2022-01-25 13:24:28 +01:00
parent a35d77d51f
commit a921072556
6 changed files with 89 additions and 77 deletions

View File

@@ -136,9 +136,25 @@ Public Class frmStart
Catch ex As Exception
LOGGER.Error(ex)
MsgBox("Unexpected Error in Check_Dropped_Files:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
Finally
' Clear all temp files after indexing
Clear_Tempfiles()
EMAIL.Clear_TempFiles()
End Try
End Sub
Private Sub Clear_Tempfiles()
'TempDateien löschen
For Each oFile In TEMP_FILES
Try
System.IO.File.Delete(oFile)
Catch ex As Exception
LOGGER.Error(ex)
End Try
Next
End Sub
Sub Open_IndexDialog()
Try
Hide()