AppStd/Monorepo
8
1
Fork 0
Code Issues Pull Requests Releases Wiki Activity

jj: update EDMDesigner

Browse Source
This commit is contained in:
Jonathan Jenne 2018-11-16 12:15:37 +01:00
parent 4858bb2be5
commit 83a63ff25d
1 changed files with 5 additions and 13 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

18
EDMDesigner/FrmConnection.vb
View File

@ -21,23 +21,15 @@ Public Class FrmConnection
Try
dbTest = New Firebird(LogConfig, My.Settings.fbDatasource, My.Settings.fbDatabaseLocation, My.Settings.fbUser, My.Settings.fbPassword)
If dbTest.ConnectionFailed Then
MsgBox("Connection failed!", MsgBoxStyle.Information, "Database Connection")
lblConnectionStatus.Text = "No connection established"
lblConnectionStatus.BackColor = Color.Red
My.Settings.Save()
DialogResult = DialogResult.None
Else
My.Settings.Save()
MsgBox("Connection successful!", MsgBoxStyle.Information, "Database Connection")
MsgBox("Connection successful!", MsgBoxStyle.Information, "Database Connection")
lblConnectionStatus.Text = "Connection established!"
lblConnectionStatus.BackColor = Color.GreenYellow
lblConnectionStatus.Text = "Connection established!"
lblConnectionStatus.BackColor = Color.GreenYellow
DialogResult = DialogResult.OK
End If
DialogResult = DialogResult.OK
Catch ex As Exception
MsgBox("Connection failed!", MsgBoxStyle.Information, "Database Connection")