W3Schools tutorial..web designing
源代码在线查看: showcode.asp@source=demo_hashtable_radio2
<script runat="server">sub Page_Loadif Not Page.IsPostBack then dim navigate=New Hashtable navigate.Add("RadioButtonList","control_radiobuttonlist.asp") navigate.Add("CheckBoxList","control_checkboxlist.asp") navigate.Add("DropDownList","control_dropdownlist.asp") navigate.Add("ListBox","control_listbox.asp") rb.DataSource=navigate rb.DataValueField="Value" rb.DataTextField="Key" rb.DataBind()end ifend subsub navigate(s as Object, e As EventArgs)response.redirect(rb.SelectedItem.Value)end sub</script><html><body><form runat="server"><asp:RadioButtonList id="rb" runat="server"AutoPostBack="True" onSelectedIndexChanged="navigate" /></form></body></html>