AppStd/ResulHandlerMSSQL
8
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

ms

Browse Source
This commit is contained in:
SchreiberM
2020-02-26 14:53:13 +01:00
parent 1496d02e59
commit 73cb093fdf
23 changed files with 404 additions and 302 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
app/ClassWMResulthandler/clsDateiverarbeitung.vb
View File

@@ -308,7 +308,7 @@ Public Class clsDateiverarbeitung
Logger.Debug("tempFilename: " & tempFilename)
'Überprüfen ob File existiert
Do While IO.File.Exists(tempFilename) = True
tempFilename = ZielPfad & "\" & Filename & "~" & version & Extension
tempFilename = ZielPfad & "\" & Filename & "_" & version & Extension
version += 1
Loop
Logger.Debug("RenameFile - OLDFilename: " & aktfile_Exportresult & " - NEWFilename: " & Path.GetFileName(tempFilename))
@@ -353,7 +353,7 @@ Public Class clsDateiverarbeitung
Dim version As Integer = 2
'Überprüfen ob File existiert
Do While IO.File.Exists(tempFilename) = True
tempFilename = ZielPfad & "\" & WMvalue & "~" & version & Extension
tempFilename = ZielPfad & "\" & WMvalue & "_" & version & Extension
version += 1
Loop
File.Copy(copybasefile, tempFilename, True)