defaultview-1.aspx

几个不错的ASP.NTE例子

<%@Import Namespace=System.Data.OleDB%>
<%@Import Namespace=System.Data%>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object, e As EventArgs)
Dim strConStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=d:\asp.net\samples\db1.mdb"
Dim strComStr As String = "Select * From score"
Dim dscA As oledbdataadapter = New oledbdataadapter(strComStr,strConStr)
Dim dsDataSet As DataSet = New DataSet()
dscA.Fill(dsDataSet, "score")
Dim dtTable As DataTable = dsDataSet.Tables("score")
'为了方便使用而宣告的别名
Dim shtR As Short
Response.Write("DataTable 中的原始资料:<br>")
For shtR=0 To dtTable.Rows.Count-1 
' 直接抓出DataTable 中的数据
Response.Write("顺序" & (shtR+1).ToString & " " & _
dtTable.Rows(shtR)("NAME") & " ")
Next
dtTable.DefaultView.Sort="CHINESE Asc" 
'设定DefaultView 的排序条件
Response.Write("<p>DataTable.DefaultView 的资料:<br>")
For shtR=0 To dtTable.DefaultView.Count-1 
'显示DataView 整理的资料
Response.Write("顺序" & (shtR+1).ToString & " " & _
dtTable.DefaultView(shtR)("NAME") & " ")
Next
End Sub
</SCRIPT>