15.06 JJ für MS
This commit is contained in:
@@ -529,11 +529,11 @@ Public Class ClassControlValues
|
||||
|
||||
Dim enableDT As DataTable = ClassDatabase.Return_Datatable(DependingControlSQL)
|
||||
|
||||
If dt.Rows.Count = 1 Then
|
||||
Dim enabled As Boolean = CBool(dt.Rows(0).Item(0))
|
||||
If enableDT.Rows.Count = 1 Then
|
||||
Dim enabled As Boolean = CBool(enableDT.Rows(0).Item(0))
|
||||
DependingControl.Enabled = enabled
|
||||
Else
|
||||
ClassLogger.Add(" >> Attention: RowCount for enabling control was '" & dt.Rows.Count.ToString & "' and not 1 as expected - Check SQL: '" & DependingControlSQL & "'")
|
||||
ClassLogger.Add(" >> Attention in Enable_Depending_Controls: RowCount for enabling control was '" & enableDT.Rows.Count.ToString & "' and not 1 as expected - Check SQL: '" & DependingControlSQL & "'")
|
||||
End If
|
||||
End If
|
||||
Next
|
||||
|
||||
Reference in New Issue
Block a user