This is a migrated thread and some comments may be shown as answers.

[Solved] VB Menu Does Not Expand

0 Answers 21 Views
Menu
This is a migrated thread and some comments may be shown as answers.
This question is locked. New answers and comments are not allowed.
Jim
Top achievements
Rank 1
Jim asked on 22 Dec 2010, 12:32 AM
The sub items are not shown and do not expand when clicked. 

<%@ Master Language="VB" Inherits="System.Web.Mvc.ViewMasterPage" %>
<%-- The following line works around an ASP.NET compiler warning --%>
<%: ""%>
  
<%@ Import Namespace="Telerik.Web.Mvc.UI" %>
  
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<head runat="server">
    <title><asp:ContentPlaceHolder ID="TitleContent" runat="server" /></title>
    <link href="../../Content/Site.css" rel="stylesheet" type="text/css" />
    <link href="../../Content/telerik.common.css" rel="stylesheet" type="text/css" />
    <link href="../../Content/telerik.simple.css" rel="stylesheet" type="text/css" />
    <link href="../../Content/telerik.rtl.css" rel="stylesheet" type="text/css" />
  
  
    <asp:ContentPlaceHolder runat="server" ID="HeadContent" />
   
</head>
  
<body>
    <div class="page">
  
        <div id="header">
            <div id="title">
                <h1>Trip Planner</h1>
            </div>
                
            <div id="logindisplay">
                <% Html.RenderPartial("LogOnUserControl")%>                
            </div
             
            <div id="menucontainer" >
           <% Html.Telerik().Menu().Name("Menu") _
                    .Items(Sub(items)
                               items.Add().Text("Tools").Items( _
                                   Sub(subitems)
                                       subitems.Add().Text("Error Page").Action("Index", "Home")
                                       subitems.Add().Text("Send Mail").Action("Index", "Home")
                                   End Sub)
                                 
                               items.Add().Text("About").Action("About", "Home")
                               items.Add().Text("Register").Action("Register", "Account")
                               items.Add().Text("Activate").Action("Index", "Activate")
  
                           End Sub).Render()
                      
                %>
  
                </div>
        </div>
  
        <div id="main">
            <asp:ContentPlaceHolder ID="MainContent" runat="server" />
  
            <div id="footer">
            </div>
        </div>
    </div>
  
</body>
</html>
Tags
Menu
Asked by
Jim
Top achievements
Rank 1
Share this question
or