TestGUI: Fix
This commit is contained in:
parent
9b10bc80e1
commit
35c13eb81d
@ -25,14 +25,19 @@ Public Class frmRelations
|
|||||||
|
|
||||||
DetailRow = oCronDetails.Rows.Item(0)
|
DetailRow = oCronDetails.Rows.Item(0)
|
||||||
JobResult = New JobResult() With {
|
JobResult = New JobResult() With {
|
||||||
|
.Tables = New List(Of JobResult.ResultTable) From {
|
||||||
|
New JobResult.ResultTable() With {
|
||||||
.Table = oUsers,
|
.Table = oUsers,
|
||||||
.TableRelationColumn = "GUID",
|
.TableRelationColumn = "GUID",
|
||||||
.ChildTable = oGroupUser,
|
.ChildTable = oGroupUser,
|
||||||
.ChildRelationColumn = "USER_ID"
|
.ChildRelationColumn = "USER_ID"
|
||||||
}
|
}
|
||||||
|
}
|
||||||
|
}
|
||||||
|
|
||||||
End Sub
|
End Sub
|
||||||
|
|
||||||
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
|
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 Sub
|
||||||
End Class
|
End Class
|
||||||
Loading…
x
Reference in New Issue
Block a user