8.1 Creating a (master / Xiang) table association
1: <% @ Import namespace = "system.data"%>
2: <% @ Import namespace = "system.data.sqlclient"%>
3:
4: <%
5: DIM MyConnection As SqlConnection
6: DIM MyDataAdapter as SqldataAdapter
7: DIM MyDataSet As Dataset
8: DIM MyDataTable as DataTable
9: DIM Publisher As Datarow
10: DIM TITLE AS DATAROW
11:
12: MyConnection = New SqlConnection ("Server = localhost; uid = sa; pwd = secret; Database = PUBS")
13: MyDataSet = New Dataset ()
14: MyDataAdapter = New SqldataAdapter ("Select * from Publishers",
http://aspfree.com/chapters/sams/graphics/ccc.gifmyConnection)
15: MyDataAdapter.Fill (MyDataSet, "Publishers")
16: mydataadapter.selectcommand = new sqlcommand ("SELECT * from Titles",
http://aspfree.com/chapters/sams/graphics/ccc.gifmyConnection)
17: MyDataAdapter.Fill (MyDataSet, "Titles")
18:
19: mydataset.reletions.add ("pubtitles",
http://aspfree.com/chapters/sams/graphics/ccc.gifmyDataSet.Tables ("Publishers") .COLUMNS ("Pub_ID"),
http://aspfree.com/chapters/sams/graphics/ccc.gifmyDataSet.Tables ("titles") .COLUMNS ("pub_id"))
20:
21: for Each Publisher in MyDataSet.Tables ("Publishers") .rows
22: Response.write ("
" & Publisher ("Pub_Name") & ":")
23: for Each Title in Publisher.getChildrows ("Pubtitles")
24: Response.write ("
25: NEXT
26: Next
27:
28:%>
29:
9.1 Using DataAdapter Update mode
1: <% @ Import namespace = "system.data"%>
2: <% @ Import namespace = "system.data.sqlclient"%> 3:
4: <%
5: DIM MyConnection As SqlConnection
6: DIM MyDataAdapter as SqldataAdapter
7: DIM MyBuilder As Sqlcommandbuilder
8: DIM MyDataSet As Dataset
9: DIM MyDataTable as DataTable
10: Dim Author as DataRow
11:
12: 'Create The Dataset and DataAdapter
13: MyConnection = New SqlConnection ("Server = localhost; uid = sa; pwd = secret; Database = PUBS")
14: mydataset = new dataset ()
15: MyDataAdapter = New SqldataAdapter ("Select * from author", myconnection)
16: MyDataAdapter.Fill (MyDataSet, "Authors")
17:
18: 'Change Value of First Row
19: MyDataSet.Tables ("authors") .ROWS (0) .Item ("au_fname") = "jane"
20:
21: 'Update the Database Table
22: MyBuilder = New SqlcommandBuilder (MyDataAdapter)
23: MyDataAdapter.Update (MyDataSet, "Authors")
twenty four:
25: 'Display The Records
26: for Each Author in MyDataSet.Tables ("authors") .rows
27: Response.write ("
" & author ("au_fname") & ""
Http://aspfree.com/chapters/sams/graphics/ccc.gif& author ("au_lname"))))
28: Next
29:%>
30:
9.2 Using DataAdapter Update mode (C #)
