File XML – Mengenal ASP.NET Bagian 3.5

February 15th 2010

Kita dapat mengikat sebuah file XML ke daftar kontrol ASP.NET.

File XML

Berikut ini adalah file XML bernama “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>

Mengikat DataSet ke Kontrol List

Pertama, impor namespace  “System.Data” . Namespace ini kita perlu untuk bekerja dengan objek DataSet. Sertakan direktif berikut pada bagian atas sebuah file .aspx :

<%@ Import Namespace="System.Data" %>

Kemudian, ciptakan sebuah DataSet untuk load file XML dan file XML ke dalam DataSet saat halaman pertama kali dibuka :

<script runat="server">
sub Page_Load
if Not Page.IsPostBack then
dim mycountries=New DataSet
mycountries.ReadXml(MapPath("countries.xml"))
end if
end sub

Mengikat DataSet ke RadioButtonList kontrol, terlebih dulu membuat RadioButtonList kontrol (tanpa asp: ListItem elemen) dalam halaman .aspx :

<html>
<body>

<form runat="server">
<asp:RadioButtonList id="rb" runat="server" AutoPostBack="True" />
</form>

</body>
</html>

Kemudian tambahkan script yang membangun DataSet XML:

<%@ 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>

Lalu kita tambahkan sebuah subrutin yang akan dijalankan ketika user mengklik pada item dalam kontrol RadioButtonList. Ketika tombol radio diklik, teks akan muncul pada label:

<%@ 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>

Contoh running program: