MS_06022016
This commit is contained in:
@@ -56,7 +56,8 @@
|
||||
If formloaded = True Then
|
||||
Try
|
||||
If FORM_IDComboBox.SelectedIndex <> -1 Then
|
||||
Dim DT1 As DataTable = ClassDatabase.Return_Datatable("SELECT GUID, NAME FROM TBPMO_CONTROL WHERE FORM_ID = " & FORM_IDComboBox.SelectedValue & " ORDER BY NAME")
|
||||
Dim sql = String.Format("SELECT GUID, NAME FROM TBPMO_CONTROL WHERE FORM_ID = {0} and CONTROL_TYPE_ID not in (1,5) ORDER BY NAME", FORM_IDComboBox.SelectedValue)
|
||||
Dim DT1 As DataTable = ClassDatabase.Return_Datatable(sql)
|
||||
CONTROL_IDComboBox.DataSource = DT1
|
||||
CONTROL_IDComboBox.DisplayMember = DT1.Columns(1).ColumnName
|
||||
CONTROL_IDComboBox.ValueMember = DT1.Columns(0).ColumnName
|
||||
|
||||
Reference in New Issue
Block a user