fix connection string in control detail

This commit is contained in:
Jonathan Jenne 2019-07-17 16:08:50 +02:00
parent ddb2038232
commit 1dd585531e

View File

@ -9,6 +9,7 @@ Public Class frmControl_Detail
Public Function FillData(ID As Integer) Public Function FillData(ID As Integer)
Try Try
TBPM_CONTROL_TABLETableAdapter.Connection.ConnectionString = CONNECTION_STRING
TBPM_CONTROL_TABLETableAdapter.FillByGUID(DD_DMSLiteDataSet.TBPM_CONTROL_TABLE, ID) TBPM_CONTROL_TABLETableAdapter.FillByGUID(DD_DMSLiteDataSet.TBPM_CONTROL_TABLE, ID)
Return True Return True
Catch ex As System.Exception Catch ex As System.Exception
@ -60,7 +61,6 @@ Public Class frmControl_Detail
Me.Location = My.Settings.frmTableColumns_Position Me.Location = My.Settings.frmTableColumns_Position
End If End If
End If End If
Me.TBPM_CONTROL_TABLETableAdapter.Connection.ConnectionString = CONNECTION_STRING
Catch ex As Exception Catch ex As Exception
LOGGER.Error(ex) LOGGER.Error(ex)
MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Laden der Formulardaten:") MsgBox(ex.Message, MsgBoxStyle.Critical, "Fehler beim Laden der Formulardaten:")