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