ZooFlow: Admin

This commit is contained in:
Jonathan Jenne
2021-04-23 15:42:00 +02:00
parent 57d27bf0b9
commit 71e3769cdd
11 changed files with 320 additions and 166 deletions

View File

@@ -19,7 +19,7 @@ Partial Public MustInherit Class BaseForm
End Sub
Public Sub ShowError(Exception As Exception)
Dim oCallingClass = LogConfig.GetClassFullName(IncludeMethodNames:=True)
Dim oCallingClass = LogConfig.GetClassFullName(IncludeMethodNames:=True, 2)
Logger.Error(Exception)
ShowError($"Error in {oCallingClass}:{vbNewLine}{Exception.Message}")
End Sub