A sample code to Create a relationship between two tables

A sample code to Create a relationship between two tables? A Datarelation represents a relationship between parent and child Datatable. ? The demonstration uses the GetChildRows to return the datarow of child objects for every child datarelation in datatable.[bold]Step 1: main.aspx[/bold][code]Label[/code][bold]Step 2: main.aspx.vb [/bold ...

Contributed by aspfree
Rating:

/ 15
June 01, 2003

Rate this Article:
MEH MEH++

SEARCH ASP FREE


Dim myconnection As SqlConnection

Dim myda As SqlDataAdapter

Dim ds As DataSet

Dim mydr As DataRelation

Try

myconnection = New SqlConnection("server=localhost;database=northwind;uid=sa;password=;")

myda = New SqlDataAdapter("Select * from Orders", myconnection)

ds = New DataSet()

myda.Fill(ds, "Orders")

myda.SelectCommand.CommandText = "Select * from [Order Details]"

myda.Fill(ds, "OrdersDet")

mydr = New DataRelation("OrderRelation", ds.Tables(0).Columns("Orderid"), ds.Tables(1).Columns("Orderid"))

ds.Relations.Add(mydr)

Dim dr1 As DataRow

Dim dr2 As DataRow

Dim strval As String

For Each dr1 In ds.Tables(0).Rows

       strval = strval & "<b>" & dr1("Orderid") & "</b>
----------------
"

       For Each dr2 In dr1.GetChildRows(mydr)

         strval = strval & "Productid: " & dr2("Productid") & " UnitPrice : " & dr2("UnitPrice") & "

"

       Next

Next

Label1.Text = (strval)

Catch ex As Exception

        Response.Write(ex.Message)

End Try