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

clean up

Browse Source
This commit is contained in:
Jonathan Jenne
2023-09-28 12:06:39 +02:00
parent a7dc616690
commit f50442bf30
5 changed files with 46 additions and 35 deletions
Download Patch File Download Diff File Expand all files Collapse all files

11
app/DD-Record-Organizer/frmFileRename.vb
View File

@@ -1,8 +1,9 @@
Imports System.IO
Public Class frmFileRename
Dim oRenameType As String
Public Sub New(DocID As Int32, oldName As String, pRenameType As String)
Private ReadOnly oRenameType As String
Public Sub New(DocID As Integer, oldName As String, pRenameType As String)
' Dieser Aufruf ist für den Designer erforderlich.
InitializeComponent()
@@ -43,7 +44,7 @@ Public Class frmFileRename
OnlyFilename = NewName
Dim oFullFilename = ClassHelper.FORMAT_WM_PATH(ClassWindreamDocGrid.SELECTED_DOC_PATH)
Dim name1 = Path.Combine(Path.GetDirectoryName(oFullFilename), NewName)
NewName = NewName & Path.GetExtension(oFullFilename)
NewName &= Path.GetExtension(oFullFilename)
OnlyFilename &= Path.GetExtension(oFullFilename)
' Rename file.
LOGGER.Info($"Renaming Old: [{OldName}]")
@@ -59,9 +60,5 @@ Public Class frmFileRename
End If
End If
End If
End Sub
End Class