ADO.NET 数据库实例教程-DataSet的使用

下面我们将具体使用DataSet对象进行相关操作,介绍DataSet的方方面面.

　　DataSet和Data Source通过DataAdapter进行联系,当DataSet取得数据库数据以后，就和数据库断开连接，针对数据作的所有数据修改在没有提交以前都在DataSet里面保存。

　　数据修改

　　我们将通过一个小的举例来说明数据怎样被修改和提交。

　　这是数据结构（Access设计）

Field Name	Type	FName	LName	ID
FName	Text	Philip	Quinn	1
LName	Text	Joesph	Payne	2
ID	AutoNumber	Douglas	Adams	3
		Michael	Okuda	4

　　举例一：

　　我们将一段一段的看程序代码：

＜%@ Page Language="VB" %＞ ＜%@ Import Namespace="System.Data" %＞ ＜%@ Import Namespace="System.Data.Oledb" %＞ ＜script language="VB" runat="server"＞ Sub Page_Load(sender as object, e as eventargs)

　　以上代码导入NameSpace同时说明编程语言为VB；

Dim objConn as New OleDBConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:/sff/site/db/test.mdb") objConn.Open() Dim ds as Dataset = New DataSet() Dim objAdapter as New OleDbDataAdapter("SELECT * FROM users", objConn) Dim objCmdBld as New OleDbCommandBuilder(objAdapter) objAdapter.Fill(ds, "users")

　　以上代码建立了Connection、DataAdapter和CommandBuilder，并且填充了DataSet。我们必须注意以下几点：

　　一、 DataAdapter是数据和DataSet之间的桥梁；

　　二、 CommandBuilder建SQL语句来执行；

Dim drow as DataRow

　　以上语句声明一个DataRow；

drow = ds.Tables("users").NewRow() drow(0) = "Gene" drow(1) = "Rodenberry" ds.Tables("users").Rows.Add(drow) drow = ds.Tables("users").NewRow() drow(0) = "Maxwell" drow(1) = "Stewart" ds.Tables("users").Rows.Add(drow)

　　以上代码为DataSet增加一个新的列；

objAdapter.Update(ds, "users")

　　以上代码将更新提交到数据库；

End Sub ＜/script＞

　　现在看看数据库，会发现已经多了两列。

　　另外一个举例

　　我们可以看一个完整的举例：

＜%@ Page Language="VB" Debug="true" %＞ ＜%@ Import Namespace="System.Data" %＞ ＜%@ Import Namespace="System.Data.Oledb" %＞ ＜script language="VB" runat="server"＞ Sub Page_Load(sender as object, e as eventargs) Dim objConn as New OleDBConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source=e:/sff/site/db/test.mdb") objConn.Open() Dim ds as Dataset = New DataSet() Dim objAdapter as New OleDbDataAdapter("SELECT * FROM users", objConn) Dim objCmdBld as New OleDbCommandBuilder(objAdapter) objAdapter.Fill(ds, "users") Dim drow as DataRow drow = ds.Tables("users").Rows(1) drow(0) = "Joseph" ds.Tables("users").Rows(0).AcceptChanges objAdapter.Update(ds, "users") End Sub ＜/script＞

　　 总结：

　　以上我们知道了怎样更新DataSet的数据，可能那些并不是特别实用，下一章我们将涉及到用较好的方式显示数据和通过TextBox修改数据。