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

Version 2.0.0.3

Browse Source
This commit is contained in:
Jonathan Jenne
2020-03-11 15:46:17 +01:00
parent 50713e61b6
commit 5f5bb9f20c
17 changed files with 1400 additions and 23083 deletions
Download Patch File Download Diff File Expand all files Collapse all files

22
Global_Indexer/ClassControls.vb
View File

@@ -395,14 +395,20 @@ Public Class ClassControls
End If
Next
If oFoundControl IsNot Nothing Then
If TypeOf oFoundControl Is TextBox Then
DirectCast(oFoundControl, TextBox).Text = oDatatable.Rows.Item(0).Item(0)
ElseIf TypeOf oFoundControl Is LookupControl2 Then
DirectCast(oFoundControl, LookupControl2).DataSource = oDatatable
ElseIf TypeOf oFoundControl Is ComboBox Then
DirectCast(oFoundControl, ComboBox).DataSource = oDatatable
End If
If oFoundControl Is Nothing Then
LOGGER.Warn("Depending Control for Index [{0}] not found!", IndexName)
End If
If oDatatable Is Nothing Then
LOGGER.Warn("Error in SQL Command: {0}", SqlCommand)
End If
If TypeOf oFoundControl Is TextBox Then
DirectCast(oFoundControl, TextBox).Text = oDatatable.Rows.Item(0).Item(0)
ElseIf TypeOf oFoundControl Is LookupControl2 Then
DirectCast(oFoundControl, LookupControl2).DataSource = oDatatable
ElseIf TypeOf oFoundControl Is ComboBox Then
DirectCast(oFoundControl, ComboBox).DataSource = oDatatable
End If
Catch ex As Exception
LOGGER.Error(ex)