Relazioni







'CREAZIONE RELAZIONI

'*********************************************************

ds.Relations.Add( _
"FK_CustomersOrdini", _
ds.Tables("Customers_table").Columns("CustomerId"), _
ds.Tables("Orders").Columns("CustomerID"), _
True) ' create a ForeignKeyConstraint too


'STAMPA RIGHE ASSOCIATE


Dim rigaCustomer As DataRow = ds.Tables("Customers_table").Rows(0)
'Dim drOrdine As DataRow



Dim righeOrders As DataRow() = rigaCustomer.GetChildRows("FK_CustomersOrdini")
Dim i As Integer = righeOrders.Length
Dim stringhe(i) As String

'Dim tabellaOrdini As New DataTable

'tabellaOrdini.Rows.Add(rigaCustomer.GetChildRows("FK_CustomersOrdini"))



For i = 0 To righeOrders.Length - 1
stringhe(i) = righeOrders(i)(0)
Next


DataGridView1.DataSource = stringhe
' For Each rigaCustomer In _

'ds.Tables("Customers_table").Rows


' For Each drOrdine In rigaCustomer.GetChildRows( _

' "FK_CustomersOrdini")


' Next

' Next










( relazioni.html )- by Paolo Puglisi - Modifica del 17/12/2023