Ms Inactivity, ApplServerConnections
This commit is contained in:
@@ -105,7 +105,7 @@ Public Class frmDesignerLayout
|
||||
_LayoutSerializer = New LayoutControlSerializer(LOGCONFIG)
|
||||
|
||||
Dim oSQL = "Select * from TBIDB_LAYOUT_CONFIG"
|
||||
FormsDatatable = ClassDatabase.Return_Datatable_ConStr(oSQL, CONNECTION_STRING_IDB)
|
||||
FormsDatatable = ClassDatabase.Return_Datatable_ConStr(oSQL, CONNECTION_STRING_IDB_WRITE)
|
||||
If Not IsNothing(FormsDatatable) Then
|
||||
For Each oRow As DataRow In FormsDatatable.Rows
|
||||
Dim oItem As New BarButtonItem(RibbonControl1.Manager, oRow.Item("TITLE"))
|
||||
@@ -149,7 +149,7 @@ Public Class frmDesignerLayout
|
||||
|
||||
Dim oSql As String = $"UPDATE TBIDB_LAYOUT_CONFIG SET XML_CONTENT = '{oControls}', XML_LAYOUT = '{oLayout}', CHANGED_WHO = '{Environment.UserName}' WHERE GUID = {SelectedLayoutId}"
|
||||
|
||||
ClassDatabase.Execute_non_Query_ConStr(oSql, CONNECTION_STRING_IDB)
|
||||
ClassDatabase.Execute_non_Query_ConStr(oSql, CONNECTION_STRING_IDB_WRITE)
|
||||
End Using
|
||||
End Using
|
||||
End Sub
|
||||
|
||||
Reference in New Issue
Block a user