jj: Fix empty error message

This commit is contained in:
Jonathan Jenne 2018-06-04 13:10:01 +02:00
parent 603ff5cd68
commit bf985f81e6

View File

@ -1283,7 +1283,7 @@ Public Class frmValidator
ClassLogger.Add(">> Validierung für Dokument '" & Document_Path & "' gestartet", False) ClassLogger.Add(">> Validierung für Dokument '" & Document_Path & "' gestartet", False)
Try Try
aktivesDokument = _windream.oSession.GetWMObjectByPath(WINDREAMLib.WMEntity.WMEntityDocument, Document_Path.Substring(2)) aktivesDokument = _windream.oSession.GetWMObjectByPath(WMEntity.WMEntityDocument, Document_Path.Substring(2))
Catch ex As Exception Catch ex As Exception
allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Fehler bei Erzeugen windream-Objekt - DocGUID: " & CURRENT_DOC_GUID & " - ERROR: " & ex.Message, Environment.UserName) allgFunk.Insert_LogEntry(CURRENT_ProfilGUID, "Fehler bei Erzeugen windream-Objekt - DocGUID: " & CURRENT_DOC_GUID & " - ERROR: " & ex.Message, Environment.UserName)
ClassLogger.Add("Fehler bei Erzeugen windream-Objekt in (LoadNextDokument): " & ex.Message) ClassLogger.Add("Fehler bei Erzeugen windream-Objekt in (LoadNextDokument): " & ex.Message)
@ -1292,9 +1292,10 @@ Public Class frmValidator
'Nochmaliger Versuch windream zu initialiseren 'Nochmaliger Versuch windream zu initialiseren
If Init_windream() = True Then If Init_windream() = True Then
Try Try
aktivesDokument = _windream.oSession.GetWMObjectByPath(WINDREAMLib.WMEntity.WMEntityDocument, Document_Path.Substring(2)) aktivesDokument = _windream.oSession.GetWMObjectByPath(WMEntity.WMEntityDocument, Document_Path.Substring(2))
Catch ex1 As Exception Catch ex1 As Exception
ClassLogger.Add("Fehler bei 2. Versuch windream-Objekt: " & ex1.Message) ClassLogger.Add("Fehler bei 2. Versuch windream-Objekt: " & ex1.Message)
errmessage = "Es besteht ein Problem beim Anmelden an windream - Bitte wenden Sie sich an Digital Data!"
_err1 = True _err1 = True
End Try End Try
Else Else
@ -1302,6 +1303,7 @@ Public Class frmValidator
_err1 = True _err1 = True
End If End If
If _err1 = True Then If _err1 = True Then
errormessage = errmessage
frmError.ShowDialog() frmError.ShowDialog()
Exit Sub Exit Sub
End If End If
@ -2789,6 +2791,9 @@ Public Class frmValidator
If LogErrorsOnly = False Then ClassLogger.Add(" >> Doc Viewer geschlossen", False) If LogErrorsOnly = False Then ClassLogger.Add(" >> Doc Viewer geschlossen", False)
'Das Dokument freigeben 'Das Dokument freigeben
TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_GUID) TBPM_PROFILE_FILESTableAdapter.CmdSETWORK(False, "", CURRENT_DOC_GUID)
TBPM_FILES_USER_NOT_INDEXEDTableAdapter.cmdInsert(Environment.UserName, CURRENT_ProfilGUID, Document_Path) TBPM_FILES_USER_NOT_INDEXEDTableAdapter.cmdInsert(Environment.UserName, CURRENT_ProfilGUID, Document_Path)
If LogErrorsOnly = False Then ClassLogger.Add(" >> Dokument freigegeben", False) If LogErrorsOnly = False Then ClassLogger.Add(" >> Dokument freigegeben", False)
ClassLogger.Add("", False) ClassLogger.Add("", False)