Data shaping（又可以被稱為分層記錄集）
如果你對ACCESS非常熟悉的話，它就類似與其中的子表。在你使用VB
進行數(shù)據(jù)庫開發(fā)的時候是你的最佳選擇。
這種技術有很強大的運用場合，特別適應與OLTP等企業(yè)級運用程序的開發(fā)。
它允許你使用一種樹狀結構來表現(xiàn)你的數(shù)據(jù)，所以它特別適合與
來給用戶顯示有關聯(lián)的數(shù)據(jù)表格形式。
簡單的來說，就是它有一個母表（Recordset）然后
該母表中的某個字段中可以再容納一個子表（Recordset）
當然一般來說，該子表中的某一個字段（例如主索引）和母表中的該字段
是關聯(lián)的（relationship），這樣當你執(zhí)行一個查詢后，結果將返回一個
多記錄集.這種Data shaping技術給我們帶來的好處如下：
1。性能上的提高，只要合理運用該技術，就能夠大大提高
ASP連接數(shù)據(jù)庫程序的性能.你也不必再為同時顯示復雜的
相互關聯(lián)的數(shù)據(jù)表單而發(fā)愁了。
2。編程上的大大簡化：由于它引入的分層記錄集結構，
使用樹狀視圖來顯示記錄，你會發(fā)現(xiàn)你使用Data Shaping技術顯示出來
的數(shù)據(jù)非常的美觀。
還是以前的方法，廢話少說，讓代碼來發(fā)言把：
本例子將使用SQL Server中帶的例子數(shù)據(jù)庫pubs

如何使用Data Shaping編程：
準備工作如下：
1。你應該安裝有MSDataShape OLEDB Provider（在MDAC2。0版本以上均帶該數(shù)據(jù)源提供者）
2。你應該會編寫Shape語言，注意這不是一般的SQL語句，具體的語法你可以查看
ACCESS中的幫助文件。
幾個必須注意的地方
(I)建立一個MSDataShape OLEDB Provider的ConnectionString如下（呵呵，看來我的那篇
數(shù)據(jù)庫連接手冊又可以加點新東東了）：
'這是一個很普通的連接字符串，呵呵，其中的Kanga其實就是SQL Server在微軟內(nèi)部的代號
strConn = "Provider=SQLOLEDB;Data Source=Kanga;" &_
" Initial Catalog=pubs;User Id=sa;Passwprd="
'好，現(xiàn)在加入MSDataShape OLEDB Provider部分
strConn = "Provider=MSDataShape; Data " & strConn
好了，現(xiàn)在你已經(jīng)設置數(shù)據(jù)的提供者為MSDataShape,
注意哦其中的數(shù)據(jù)源提供者是你真正的DSN部分。
(II)Shape語言
Shape語法你可以在ADO的幫助中可以找到詳細的描述，我也不羅嗦
一般最常用的語句如下：
SHAPE {parent command} [AS parent alias]
APPEND ({child command} [AS child alias]
RELATE parent_column TO child_column) [AS parent_column_name]
一個最簡單的例子如下：
SHAPE {SELECT * FROM Publishers}
APPEND ({SELECT * FROM Titles}
RELATE Pub_ID TO Pub_ID) AS rsTitles
上面的語句將Titles表作為Publishers的一個子表關聯(lián)在一起，那么怎么訪問它
的數(shù)據(jù)了，語法如下：
Set rsTitles = rsPublishers("rsTitles").Value
現(xiàn)在的rsTitles就是一個記錄集，它就是子表中的數(shù)據(jù)
ASPShape.ASP文件代碼如下：
<%
Dim rsPublishers
Dim rsTitles
Dim strShapeConn
Dim strShape
Dim strConn

strConn = "Provider=SQLOLEDB;Data Source=Kanga;" &_
" Initial Catalog=pubs;User Id=sa;Passwprd="

Set rsPublishers = Server.CreateObject("ADODB.RecordSet")
strShapeConn = "Provider=MSDataShape; Data " & strConn
strShape = "SHAPE {SELECT * FROM Publishers}" & _
" APPEND ({SELECT * FROM Titles}" & _
" RELATE Pub_ID TO Pub_ID) AS rsTitles"


rsPublishers.Open strShape,strShapeConn
Response.Write "<UL>"
While Not rsPublishers.EOF
Response.Write "<LI>" & rsPublishers("Pub_Name")
Response.Write "<UL>"
'下面開始顯示子表的數(shù)據(jù)
Set rsTitles = rsPublsihers("rsTitles").Value
While Not rsTitles.EOF
Response.Write "<LI>" & rsTitles("title")
rsTitles.MoveNext
Wend
Response.Write "</UL>"
rsPublishers.MoveNext
Wend
Response.Write "</UL>"

rsPublishers.Close
Set rsPublishers = Nothing
Set rsTitles = Nothing
%>
大家可以運行以上的代碼然后觀看它的結果，再和平常的
使用SQL查詢出來的相比較一下。
附注：這個時候只要再附加一點DHTML的語句，就能夠做成
樹狀結構的收起和展開效果（就是類似與資源管理器左邊的那個效果）
呵呵，這方面掉掉可是非常在行的把。
呵呵，上面介紹的只是很簡單的一個子表，下面簡單介紹一下
多子表的情況。
如果你的數(shù)據(jù)表中只有一個子表的話，其實使用SQL也能夠來完成的，
還不能夠充分顯示Data Shaping技術的優(yōu)勢，但是如果你的母表中
同時有多個字段和其他的表有關聯(lián)的話，你就可以充分看到這個技術的
威力了。
下面給出一個兩個子表的例子
SHAPE {SELECT * FROM Publishers}
APPEND ({SELECT * FROM Titles}
RELATE Pub_ID TO Pub_ID) AS rsTitles,
({SELECT * FROM Employee}
RELATE Pub_ID TO Pub_ID) AS rsEmployees
簡單把，呵呵。
這個還不算什么，要知道。如果當你的數(shù)據(jù)表中的
子表還有子表時，（這就是所謂的層狀結構的記錄集嘛）
使用Data Shaping技術你會發(fā)現(xiàn)更加的方便。這也是為什么
我在開始的時候說的該技術特別適用與OLTP和企業(yè)級復雜的數(shù)據(jù)庫開發(fā)的緣故了。
下面是一個兩層子表的例子
SHAPE {SELECT * FROM Publishers}
APPEND (( SHAPE {SELECT * FROM Titles}
APPEND ({SELECT * FROM Sales}
RELATE Title_ID TO Title_ID) AS rsSales)
RELATE Pub_ID TO Pub_ID) AS rsTitles

其實，不僅可以在Data Shaping中使用SQL語句，還可以使用存儲過程的。