[CODE]


    Protected Sub accMdenuLaterale_ItemDataBound(ByVal sender As Object, ByVal e As AjaxControlToolkit.AccordionItemEventArgs) Handles accMdenuLaterale.ItemDataBound

        If (e.ItemType = AjaxControlToolkit.AccordionItemType.Content) Then

            ' Popola il Sottomenu
            Dim dtlSottomenu As DataList = CType(e.AccordionItem.FindControl("dtlSottomenu"), DataList)
            Dim hydlblIDMenu As HiddenField = CType(e.AccordionItem.FindControl("hydlblIDMenu"), HiddenField)
            '
            BindGrid(dtlSottomenu, hydlblIDMenu.Value)
            '
            ' Assegna Evento al LinkButton
            ' 
            'Dim lnkSottomenu As LinkButton = CType(FindControlRecursive(dtlSottomenu, "lnkSottomenu"), LinkButton)
            'AddHandler lnkSottomenu.Click, AddressOf lnkSottomenu_Click

            AddHandler dtlSottomenu.ItemDataBound, AddressOf dtlSottomenu_ItemDataBound

        End If

    End Sub

    Private Sub dtlSottomenu_ItemDataBound(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.DataListItemEventArgs)

        '
        ' Assegna Evento al LinkButton
        ' 
        Dim accMdenuLaterale As AjaxControlToolkit.Accordion = CType(Page.FindControl("accMdenuLaterale"), AjaxControlToolkit.Accordion)
        Dim dtlSottomenu As DataList = CType(accMdenuLaterale.FindControl("dtlSottomenu"), DataList)
        Dim lnkSottomenu As LinkButton = CType(dtlSottomenu.FindControl("lnkSottomenu"), LinkButton)
        '
        AddHandler lnkSottomenu.Click, AddressOf lnkSottomenu_Click

    End Sub

[/CODE]