到这一步,你的dataset应该完全被来自数据库中的数据填充了,因此你可以关闭数据库连接对象。尽可能早的关闭连接永远是一个好的编程习惯,这样你可以将它释放给其他应用程序。另一方面,如果当前程序将要立即使用这个连接——也许是为了创建另一个dataset,你可以保持它为打开状态以避免重建该连接带来的额外开销。
注意:如果你在该应用程序中对每个连接重用完全相同的连接字符串——包括嵌套空间,默认情况下,ado.net将共用同一个连接。因此在大多数情况下,关闭和重新打开一个连接只会导致非常小的开销(可以忽略不计)。
我们可以说,现在你的dataset已经填充完毕,并且准备好以供使用,同时从数据库断开了连接。在许多应用程序程序中,这些就是你所需要的,但是你可能希望创建多种关系,用以建立数据的分级特性。创建这些关系需要使用datarelation类。
重点 即使你在你的数据库中定义了相关的完整性关系,你也没有方法在一个dataset中自动重建这些关系——换句话说,你必须手工创建这些关系。
创建一个数据关系需要引用dataset中现存表两个以上的列。下面的代码中使用parent和child datacolumn对象来在两个表中的主键与外键之间添加关系。一旦你实例化这些对象(parent和child对象),你就可以实例化datarelation对象,并传递给其一个名字,用以标识关系属于parent 和child 对象。
代码还设置关系的nested(嵌套)属性为 true.当你读取该dataset的xml表示时,child元素并不会自动嵌套到它的parent对象中。相反,所有的parent元素先被列出来,所有的child元素紧随其后,并按层次进行分组。虽然种非常有用的结构是罕见的,但是nested属性嵌套了数据。
最后一步,添加新的datarelation对象到该dataset对象的relations集合中。注意到,代码中是使用表的名字作为引用表识的。你可以将它们替换为你自己的表的名字。
add the relationships to the dataset
customers -> orders
dim parent as datacolumn = _
ds.tables("customers").columns("customerid")
dim child as datacolumn = ds.tables("orders").columns("customerid")
dim sqlrel as new datarelation("customer orders", parent, child)
sqlrel.nested = true
ds.relations.add(sqlrel)
该过程的最后一步将dataset对象的xml架构和数据保存到硬盘上。使用dataset时这一步不是必须的,但是在“将dataset作为xml导入到excel 2003 worksheet”节,你将看到如何使用它们。
大多数.net frameword对象支持序列化成一维或多维,但是,dataset对象使序列化变得更为简单——使用writexml和writexmlschema方法就能做到。当你调用这两个方法使,需要传递相应磁盘文件的名字给每个方法,数据就保存到相应的文件中。你可以提供完整路径,但是这段代码将文件保存到应用程序的bin文件夹。在这里有用到表名称作为引用标志。
‘可选步骤:将xml数据和架构保存为磁盘文件
if bsaveschema then
places the file in this apps bin directory
ds.writexmlschema("customers.xsd")
ds.writexml("customers.xml")
end if
该过程将完整的dataset对象返回给调用它的过程。
return ds
end function
为单一实体创建dataset
当你在一个客户端应用程序中创建一个dataset时,ado.net将来自数据库的所有数据通过网络传递到客户端,并尽最大可能将必需数据完全填充到这个dataset中。
如果你的表有数百万条记录,将会发生什么?你希望通过网络传递尽可能少的数据填充到dataset中,例如,你很可能仅仅希望得到单一某个客户的信息。在northwind数据库中,数据访问层的类方法getcustomerdataset就是实现这个功能的,它使用用户从窗体上的下拉列表框中所选择的customerid作为参数来选定某个特定客户。
你需要的代码与getdataset中的代码极为类似,但是有一些重要的不同点。首先,你现在需要过滤数据。也就是说,你必须过滤表中的数据,以便只返回必需的记录,并且对任何相关表都要执行这些操作,但是若有多个表一般就会返回多个记录,例如:筛选出客户已经下的订单的某个(一个客户可能下0个或多个订单)。
你可以对dataset中所容纳的数据执行筛选和排序,但是这意味着整个数据集都将穿越网络。一个好的方式是在数据库端执行筛选和排序,并且只返回必需的记录。
你可以通过sqlparameter对象执行筛选。这些参数应用于代码中的每个动态sql语句,注意,执行这样的方法与调用相应的存储过程是等效的。
下面的代码填充dataset中的customers表。注意到现在的sql语句有一个where子句,没有order by子句——对单一某个记录是不必排序的。该sqlcommand对象和前面一样的方式实例化,但是现在它需要设置@custid参数。sqlparameter对象用参数名——@custid,和参数类型——nchar(5)实例化。然后它设置参数的value属性为传递到该过程的值。最后一步是添加这个新参数叨命令对象的parameters集合中,然后调用数据适配器的fill(同前面的步骤)。sql语句需要多少参数,你就可以添加多少参数对象。
dim sql as string = "select customerid, companyname, contactname, " _
contacttitle, address, city, region, postalcode, country, " _
& "phone, fax from customers where customerid = @custid"
dim sqlcmd as new sqlcommand(sql, sqlcnn)
dim sqlparam as new sqlparameter("@custid", sqldbtype.nchar, 5)
sqlparam.value = scustid
sqlcmd.parameters.add(sqlparam)
dim sqlda as new sqldataadapter(sqlcmd)
sqlda.fill(ds, "customers")
另一些表以几乎完全相同方法填充,除了某些被过滤的表需要合并到orders表中,这样customerid才可以访问。
每个子表需要重用sqlparameter对象,因为它们都需要过滤customerid,而不仅仅只products表用到。你希望返回数据库中的所有产品,而不管该产品是否被订购。因此,该代码的这个部分调用了parameters集合的clear方法。