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

DAtabase integriert

Browse Source
This commit is contained in:
SchreiberM
2023-05-22 16:55:44 +02:00
parent 2db575d944
commit c2deb54f11
114 changed files with 8526 additions and 14722 deletions
Download Patch File Download Diff File Expand all files Collapse all files

4
app/DD-Record-Organizer/frmLogRecord.vb
View File

@@ -18,7 +18,7 @@
Me.TBPMO_RECORD_LOG_CONFIGTableAdapter.Connection.ConnectionString = MyConnectionString
Me.TBPMO_RECORD_LOG_CONFIGTableAdapter.Fill(Me.DD_DMSDataSet.TBPMO_RECORD_LOG_CONFIG)
Dim DT1 As DataTable = ClassDatabase.Return_Datatable("SELECT GUID, NAME AS DISPLAY FROM TBPMO_FORM ORDER BY NAME")
Dim DT1 As DataTable = MYDB_ECM.GetDatatable("SELECT GUID, NAME AS DISPLAY FROM TBPMO_FORM ORDER BY NAME")
FORM_IDComboBox.DataSource = DT1
FORM_IDComboBox.DisplayMember = DT1.Columns(1).ColumnName
@@ -57,7 +57,7 @@
Try
If FORM_IDComboBox.SelectedIndex <> -1 Then
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)
Dim DT1 As DataTable = MYDB_ECM.GetDatatable(sql)
CONTROL_IDComboBox.DataSource = DT1
CONTROL_IDComboBox.DisplayMember = DT1.Columns(1).ColumnName
CONTROL_IDComboBox.ValueMember = DT1.Columns(0).ColumnName