MS_19012016

This commit is contained in:
SchreiberM
2016-01-20 11:33:37 +01:00
parent 0c256313e2
commit 48fe3a4845
10 changed files with 88 additions and 42 deletions

View File

@@ -28,6 +28,7 @@ Public Class ClassInit
If dbResult = False Then
Throw New Exception("Find more information in the logfile.")
End If
Return True
Catch ex As Exception
MsgBox("Unexpected Error in Init Database:" & vbNewLine & ex.Message, MsgBoxStyle.Critical)
Return False