diff --git a/app/TaskFlow/ClassParamRefresh.vb b/app/TaskFlow/ClassParamRefresh.vb index 98256e9..58f5323 100644 --- a/app/TaskFlow/ClassParamRefresh.vb +++ b/app/TaskFlow/ClassParamRefresh.vb @@ -222,7 +222,7 @@ Public Class ClassParamRefresh ElseIf oMode.StartsWith("PM.ButtonExport2FolderCaption") Then Dim oAfterReplace = oMode.Replace("PM.ButtonExport2FolderCaption=", "") ButtonExport2Folder_Caption = oAfterReplace - ElseIf oMode.StartsWith("PM.ButtonExportMode") Then + ElseIf oMode.StartsWith("PM.ButtonExport2Folder_Mode") Then Dim oAfterReplace = oMode.Replace("PM.ButtonExport2Folder_Mode=", "") ButtonExport2Folder_Mode = oAfterReplace ElseIf oMode.StartsWith("PM.ButtonExport2Folder_RootFolder") Then diff --git a/app/TaskFlow/My Project/AssemblyInfo.vb b/app/TaskFlow/My Project/AssemblyInfo.vb index 05a1140..c64e5d8 100644 --- a/app/TaskFlow/My Project/AssemblyInfo.vb +++ b/app/TaskFlow/My Project/AssemblyInfo.vb @@ -13,8 +13,8 @@ Imports System.Runtime.InteropServices - - + + @@ -32,6 +32,6 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - + diff --git a/app/TaskFlow/frmValidator.vb b/app/TaskFlow/frmValidator.vb index 4c8921d..db66eaa 100644 --- a/app/TaskFlow/frmValidator.vb +++ b/app/TaskFlow/frmValidator.vb @@ -5657,14 +5657,20 @@ Public Class frmValidator Dim oConverter As New PDFConverter(LOGCONFIG) If oConverter.ConvertPDFADocumentToPDFDocument(WMDocPathWindows, oTempFullFilename) = False Then Logger.Warn("File [{0}] could not be converted to plain PDF!", WMDocPathWindows) + oFile2Export = WMDocPathWindows + Else + oFile2Export = oTempPath End If - - oFile2Export = oTempPath + Else + oFile2Export = WMDocPathWindows End If + Else + oFile2Export = WMDocPathWindows End If Else oFile2Export = WMDocPathWindows End If + Logger.Info("Final export path is: [{0}]", oFile2Export) File.Copy(oFile2Export, oTargetPath) Logger.Info($"File {WMDocPathWindows} exported successfully!") oCount += 1