From 35c13eb81d4fe10b244c1c92753cc365c94c5d7e Mon Sep 17 00:00:00 2001 From: Jonathan Jenne Date: Tue, 22 Dec 2020 14:42:11 +0100 Subject: [PATCH] TestGUI: Fix --- GUIs.Test.TestGUI/frmRelations.vb | 15 ++++++++++----- 1 file changed, 10 insertions(+), 5 deletions(-) diff --git a/GUIs.Test.TestGUI/frmRelations.vb b/GUIs.Test.TestGUI/frmRelations.vb index 59c7bc7c..e0bff40d 100644 --- a/GUIs.Test.TestGUI/frmRelations.vb +++ b/GUIs.Test.TestGUI/frmRelations.vb @@ -25,14 +25,19 @@ Public Class frmRelations DetailRow = oCronDetails.Rows.Item(0) JobResult = New JobResult() With { - .Table = oUsers, - .TableRelationColumn = "GUID", - .ChildTable = oGroupUser, - .ChildRelationColumn = "USER_ID" + .Tables = New List(Of JobResult.ResultTable) From { + New JobResult.ResultTable() With { + .Table = oUsers, + .TableRelationColumn = "GUID", + .ChildTable = oGroupUser, + .ChildRelationColumn = "USER_ID" + } + } } + End Sub Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click - JobListener.SaveDataTables(JobResult, DetailRow) + JobListener.SaveDataTables(JobResult.Tables.First) End Sub End Class \ No newline at end of file