DataView 對象也可以當成數據源使用。下列范例利用RadioButtonList Web 控件將Members數據表的DefaultView 對象當成數據源使用:
<%@Import Namespace=System.Data.ADO%>
<%@Import Namespace=System.Data%>
<Html>
<Form Id=Form1 Runat="Server">
請選擇一個使用者:
<ASP:RadioButtonList Id="rblA" AutoPostBack="True"
OnSelectedIndexChanged="rblA_Chg" Runat="Server"/>
</Form>
<ASP:Label Id="Label1" Runat="Server"/>
<Script Language="VB" Runat="Server">
Sub Page_Load(Sender As Object, e As EventArgs)
If Page.IsPostBack=False Then '連接數據庫讀取數據及系結的工作只要作一
次
Dim strConStr As String = "Provider=Microsoft.Jet.OLEDB.4.0;" & _
"Data Source=C:\InetPub\wwwroot\CR\CH05\MyWeb.mdb"
Dim strComStr As String = "Select * From Members"
Dim dscA As ADODataSetCommand = New
ADODataSetCommand(strComStr,strConStr)
Dim dsDataSet As DataSet = New DataSet()
dscA.FillDataSet(dsDataSet, "Members")
rblA.DataSource=dsDataSet.Tables("Members").DefaultView '將
DataTable 當成數據源
rblA.DataTextField="UserName" '指定要顯示的字段
rblA.DataValueField="UserId" '指定這個字段代表的值
Page.DataBind()
End If
End Sub
Sub rblA_Chg(Sender As Object, e As EventArgs)
Label1.Text="選擇項目為: " & rblA.SelectedItem.Text & _
"<br>所代表值為: " & rblA.SelectedItem.Value
End Sub
</SCRIPT>
</Html>