jj: Database version 0.0.3

This commit is contained in:
Jonathan Jenne
2018-11-09 10:47:59 +01:00
parent ae05186b5e
commit 084fa29f3d
11 changed files with 468 additions and 55 deletions

View File

@@ -57,7 +57,7 @@ Public Class FrmMain
Private Sub Init()
_firebird = New Firebird(_logConfig, My.Settings.fbDatasource, My.Settings.fbDatabaseLocation, My.Settings.fbUser, My.Settings.fbPassword)
If _firebird.ConnectionFailed Then
MsgBox("Database connection failed. Please check the log.", vbCritical)
Exit Sub