<%@ Import Namespace="System.Data" %><script runat="server">sub Page_Loadif Not Page.IsPostBack then dim ds=New DataSet ds.ReadXml(MapPath("name.xml")) radio.DataSource=ds radio.DataValueField="value" radio.DataTextField="text" radio.DataBind()end ifend subsub show(s as Object,e As EventArgs)lbldisplay.text="Your favorite name is: " & radio.SelectedItem.Textend sub</script><html><body><form runat="server"><asp:RadioButtonList id="radio" runat="server"AutoPostBack="True" onSelectedIndexChanged="show" /><p><asp:label id="lbldisplay" runat="server" /></p></form></body></html>