This commit is contained in:
Jonathan Jenne
2021-05-17 10:37:43 +02:00
parent d038beedfe
commit 9d51d4ffb9
16 changed files with 52 additions and 40 deletions

View File

@@ -866,7 +866,7 @@ Public Class frmSearchStart
Dim oSearchTerm As String = ""
Dim oFilter As String = $"GUID = {pAttrID}"
Dim oFilteredRows() As DataRow = My.DTAttributes.Select(oFilter)
Dim oFilteredRows() As DataRow = My.Tables.DTIDB_ATTRIBUTE.Select(oFilter)
If oFilteredRows.Length = 1 Then
For Each oRow As DataRow In oFilteredRows
Dim oType As Integer = DirectCast(oRow.Item("TYP_ID"), Integer)