Click here to Skip to main content
15,891,204 members
Please Sign up or sign in to vote.
0.00/5 (No votes)
See more:
hi..

I am using asp.net menu control.I want to set and access menuitem id on selection of menuItem in code behind.i am using master page.I am generating menu items by binding dataset.Also assign path to it.I want access this menuId on pageload of master page when selected
My code is for menu Item is:

VB
Private Sub LoadMenu(ByVal dsMenu As DataSet)
        Dim ds As New DataSet
        Dim i As Integer = 0
        If dsMenu.Tables.Count > 0 Then

            '==========Add Relation between MainMenu table and Menu table

            If (dsMenu.Tables.Count > 1) Then
                If (dsMenu.Tables(1).Rows.Count > 0) Then
                    dsMenu.Relations.Add("Menu", dsMenu.Tables(0).Columns("MenuId"), dsMenu.Tables(1).Columns("parentId"))
                End If
            End If

            '========== Add Relation between Menu table and SubMenu table =====================

            If (dsMenu.Tables.Count > 2) Then
                If (dsMenu.Tables(2).Rows.Count > 0) Then
                    dsMenu.Relations.Add("SubMenu", dsMenu.Tables(1).Columns("MenuId"), dsMenu.Tables(2).Columns("parentId"))
                End If
            End If

            '================================ Add menuItem to MainMenu(level2) ============================

            For Each MainMenu As DataRow In dsMenu.Tables(0).Rows
                Dim MainMenuItem As MenuItem
                MainMenuItem = New MenuItem(MainMenu("MenuName").ToString)
                MenuCntrl.Items.Add(MainMenuItem)

                '============================== Add menuItem to Menu(level2) ============================

                For Each Menu As DataRow In MainMenu.GetChildRows("Menu")
                    Dim MenuItem As MenuItem

                    MenuItem = New MenuItem(Menu("MenuName").ToString)
                    'MenuItem = New MenuItem("testMenu")
                    MainMenuItem.ChildItems.Add(MenuItem)

                    '========================= Add menuItem to SubMenu(level3) ============================

                    For Each subMenu As DataRow In Menu.GetChildRows("SubMenu")
                        Dim SubMenuItem As MenuItem
                        Dim UrlPath As String
                        UrlPath = subMenu("ProgramName").ToString + "?MenuId=" + subMenu("MenuId").ToString

                        'SubMenuItem = New MenuItem(subMenu("MenuName").ToString, "", "", subMenu("ProgramName").ToString)
                        SubMenuItem = New MenuItem(subMenu("MenuName").ToString, subMenu("MenuId").ToString, "", subMenu("ProgramName").ToString)
                        SubMenuItem.Value = subMenu("MenuId").ToString
                        'SubMenuItem = New MenuItem(subMenu("MenuName").ToString, "", "", "CHSOC_M_Society.aspx")
                        MenuItem.ChildItems.Add(SubMenuItem)

                    Next
                Next
            Next
        End If

provide solution for it.
Posted
Updated 26-Jun-12 1:00am
v2

This content, along with any associated source code and files, is licensed under The Code Project Open License (CPOL)



CodeProject, 20 Bay Street, 11th Floor Toronto, Ontario, Canada M5J 2N8 +1 (416) 849-8900