<%@ Register TagPrefix="skm" Namespace="skmMenu" Assembly="skmMenu" %>
<script language="VB" runat="server">
Sub Page_Load(sender as Object, e as EventArgs)
If Not Page.IsPostBack then
Menu1.DataSource = Server.MapPath("MenuData.xml")
Menu1.DataBind()
End If
End Sub
</script>
<form runat="server">
<skm:Menu id="Menu1" runat="server" Layout="Horizontal">
<MenuStyle BackColor="LightGray" CellPadding="4" Font-Name="Verdana"
Font-Size="11pt" BorderColor="Black" BorderStyle="solid" BorderWidth="2px" />
<SelectedMenuItemStyle BackColor="LightYellow" />
</skm:Menu>
</form>
|