Мы можем связать файл XML для управления списком.
XML файла
Вот файл XML с именем "countries.xml" :
<?xml version="1.0" encoding="ISO-8859-1"?>
<countries>
<country>
<text>Norway</text>
<value>N</value>
</country>
<country>
<text>Sweden</text>
<value>S</value>
</country>
<country>
<text>France</text>
<value>F</value>
</country>
<country>
<text>Italy</text>
<value>I</value>
</country>
</countries>Посмотрите на файл XML: countries.xml
Привязка DataSet к элементу управления List
Во- первых, импортировать "System.Data" пространства имен. Нам необходимо это пространство имен для работы с объектами DataSet. Включите следующую директиву в верхней части страницы .aspx:
<%@ Import Namespace="System.Data" %>Затем создайте DataSet для файла XML и загрузить файл XML в DataSet при первой загрузке страницы:
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
dim mycountries=New DataSet
mycountries.ReadXml(MapPath("countries.xml"))
end if
end subДля того, чтобы связать DataSet с элементом управления RadioButtonList, сначала нужно создать элемент управления RadioButtonList (без каких-либо осины: ListItem элементы) на странице .aspx:
<html>
<body>
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" />
</form>
</body>
</html>Затем добавить скрипт, который строит XML DataSet:
<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
dim mycountries=New DataSet
mycountries.ReadXml(MapPath("countries.xml"))
rb.DataSource=mycountries
rb.DataValueField="value"
rb.DataTextField="text"
rb.DataBind()
end if
end sub
</script>
<html>
<body>
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
</form>
</body>
</html>Затем мы добавим подпрограмма будет выполняться, когда пользователь щелкает на элементе управления RadioButtonList. Когда радио-кнопка нажата, текст будет отображаться в метке:
пример
<%@ Import Namespace="System.Data" %>
<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
dim mycountries=New DataSet
mycountries.ReadXml(MapPath("countries.xml"))
rb.DataSource=mycountries
rb.DataValueField="value"
rb.DataTextField="text"
rb.DataBind()
end if
end sub
sub displayMessage(s as Object,e As EventArgs)
lbl1.text="Your favorite country is: " & rb.SelectedItem.Text
end sub
</script>
<html>
<body>
<form runat="server">
<asp:RadioButtonList id="rb" runat="server"
AutoPostBack="True" onSelectedIndexChanged="displayMessage" />
<p><asp:label id="lbl1" runat="server" /></p>
</form>
</body>
</html>
Показать пример »