|
کد
|
<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(ByVal s
As Object, ByVal e As EventArgs)
lbl1.Text = "Your
favorite country is: " & rb.SelectedItem.Text
End Sub
</script>
<html>
<body>
<form id="Form1" runat="server">
<asp:RadioButtonList id="rb" runat="server
" AutoPostBack="True" onSelectedIndexChanged="displayMessage"
/>
<p><asp:label id="lbl1" runat="server"
/></p>
</form>
</body>
</html>
|