diff --git a/AVISOUPDATER/AVISOUPDATER_Version.txt b/AVISOUPDATER/AVISOUPDATER_Version.txt index a88f811..9904c66 100644 --- a/AVISOUPDATER/AVISOUPDATER_Version.txt +++ b/AVISOUPDATER/AVISOUPDATER_Version.txt @@ -1 +1 @@ -7.3 \ No newline at end of file +7.4 \ No newline at end of file diff --git a/AVISOUPDATER/cProgrammeUpdate.vb b/AVISOUPDATER/cProgrammeUpdate.vb index 54fd8b9..c6534dc 100644 --- a/AVISOUPDATER/cProgrammeUpdate.vb +++ b/AVISOUPDATER/cProgrammeUpdate.vb @@ -100,10 +100,19 @@ Public Class cProgrammeUpdate 'Kopieren/Überschreiben der neuen Files: For Each f In LIST_SOURCE If isNewFile(f, LIST_DEST) Then + 'Dim FI = New IO.FileInfo() + Dim s_path = dirNameReplace_SOURCE & "\" & If(f.pud_filePathFolder, "") & "\" & f.pud_fileName.Replace("\\", "\") - Dim d_path = dirNameReplace_DEST & "\" & If(f.pud_filePathFolder, "") & "\" & f.pud_fileName.Replace("\\", "\") - IO.File.Copy(s_path, d_path) + Dim d_path = dirNameReplace_DEST & "\" & If(f.pud_filePathFolder, "") & "\" & f.pud_fileName.Replace("\\", "\") + If fileStartsWith(f.pud_fileName, ignoreFilesBeginWith) And IO.File.Exists(d_path) Then + 'Wenn Ziel-Date in der ignore-List und die Datei existiert auch, soll diese nicht kopiert werden. + 'Wenn Sie nicht exisistiert wir die Datei schon kopiert (zB Standort.txt) + Else + + IO.File.Copy(s_path, d_path, True) + End If End If + Next Catch ex As Exception diff --git a/Aviso/My Project/AssemblyInfo.vb b/Aviso/My Project/AssemblyInfo.vb index 2e6f49c..304ed3f 100644 --- a/Aviso/My Project/AssemblyInfo.vb +++ b/Aviso/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Aviso/My Project/Resources.Designer.vb b/Aviso/My Project/Resources.Designer.vb index 183afc8..c29c729 100644 --- a/Aviso/My Project/Resources.Designer.vb +++ b/Aviso/My Project/Resources.Designer.vb @@ -269,6 +269,15 @@ Namespace My.Resources End Get End Property + ''' + ''' Sucht eine lokalisierte Zeichenfolge, die ähnelt. + ''' + Public ReadOnly Property asdadasda5sd() As String + Get + Return ResourceManager.GetString("asdadasda5sd", resourceCulture) + End Get + End Property + ''' ''' Sucht eine lokalisierte Ressource vom Typ System.Byte[]. ''' @@ -1700,7 +1709,7 @@ Namespace My.Resources End Property ''' - ''' Sucht eine lokalisierte Zeichenfolge, die 7.3 ähnelt. + ''' Sucht eine lokalisierte Zeichenfolge, die 7.4 ähnelt. ''' Public ReadOnly Property UpdaterVersion() As String Get diff --git a/Aviso/My Project/Resources.resx b/Aviso/My Project/Resources.resx index 4d2bff8..d7ab02e 100644 --- a/Aviso/My Project/Resources.resx +++ b/Aviso/My Project/Resources.resx @@ -545,7 +545,7 @@ ..\Resources\mitarbeiter_s.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a - 7.3 + 7.4 ..\resources\dgs_instructions_import.xlsx;System.Byte[], mscorlib, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089 @@ -697,4 +697,7 @@ ..\Resources\qr_s.png;System.Drawing.Bitmap, System.Drawing, Version=4.0.0.0, Culture=neutral, PublicKeyToken=b03f5f7f11d50a3a + + + \ No newline at end of file