Event fire problem med treeview

har du sæt select til select expand ?

du skal finde den del af treeviewet der hedder SelectAction og sætte den til SelectExpand.
eller Expand,

Nej den fungerer ikke...
Hvis jeg sætter min ShowExpandCollapse til true i treeview control'en, så udfolder menu'en sig vde at klikke på plus'et, men jeggerne have den at fungere uden plus'erne.

Her er al koden:

<asp:TreeView ID="tvMenu" BackColor="#E2E9EF" ExpandDepth="0" CssClass="treeview" ShowExpandCollapse="true" runat="server" Width="148px" PopulateNodesFromClient="true" >
<ParentNodeStyle CssClass="parentnode" Width="148px" />
<LeafNodeStyle CssClass="leafnode" Width="148px" />
<SelectedNodeStyle CssClass="selectednode" Font-Bold="True" Width="148px" />
</asp:TreeView>

Private Sub PopulateRootLevel()
        Dim objConn As New SqlConnection(ConfigurationManager.ConnectionStrings("CONN").ToString)
        Dim objCommand As New SqlCommand("EXEC usr_qPS_GetFolders @uiParent, @uiUser", objConn)
        objCommand.Parameters.Add("@uiParent", SqlDbType.NChar).Value = ConfigurationManager.AppSettings("MENU").ToString
        objCommand.Parameters.Add("@uiUser", SqlDbType.NChar).Value = ConfigurationManager.AppSettings("USER").ToString

        Dim da As New SqlDataAdapter(objCommand)
        Dim dt As New DataTable()
        da.Fill(dt)

        PopulateNodes(dt, tvMenu.Nodes)
End Sub

Private Sub PopulateNodes(ByVal dt As DataTable, ByVal nodes As TreeNodeCollection)
        For Each dr As DataRow In dt.Rows
            Dim tn As New TreeNode()
            tn.Text = dr("sName").ToString()
            tn.Value = dr("uiFolder").ToString()

            If dr("sType").ToString.ToUpper = "FOLDER" Then
                tn.NavigateUrl = "Default.aspx?FolderID=" & dr("uiFolder").ToString()
            Else
                tn.NavigateUrl = "Default.aspx?DocID=" & dr("uiFolder").ToString()
            End If

            tn.SelectAction = TreeNodeSelectAction.SelectExpand
            nodes.Add(tn)

            'If node has child nodes, then enable on-demand populating
            tn.PopulateOnDemand = (CInt(dr("iHasDocs")) > 0)
        Next
End Sub

Private Sub PopulateSubLevel(ByVal uiParent As String, ByVal parentNode As TreeNode)
        Dim objConn As New SqlConnection(ConfigurationManager.ConnectionStrings("CONN").ToString)
        Dim objCommand As New SqlCommand("EXEC usr_get_menu @uiParent", objConn)
        objCommand.Parameters.Add("@uiParent", SqlDbType.NChar).Value = uiParent.ToString

        Dim da As New SqlDataAdapter(objCommand)
        Dim dt As New DataTable()
        da.Fill(dt)

        PopulateNodes(dt, parentNode.ChildNodes)
End Sub

Protected Sub tvMenu_TreeNodePopulate(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.TreeNodeEventArgs) Handles tvMenu.TreeNodePopulate
        PopulateSubLevel(e.Node.Value, e.Node)
End Sub

prøv med :
<asp:TreeView ID="tvMenu" BackColor="#E2E9EF" ExpandDepth="0" CssClass="treeview" ShowExpandCollapse="true" runat="server" Width="148px" PopulateNodesFromClient="true" >
<ParentNodeStyle CssClass="parentnode" Width="148px" />
<LeafNodeStyle CssClass="leafnode" Width="148px" />
<SelectedNodeStyle CssClass="selectednode" Font-Bold="True" Width="148px" />
<DataBindings>
        <asp:TreeNodeBinding  SelectAction="SelectExpand"/>
        <asp:TreeNodeBinding  SelectAction="SelectExpand"/>
        <asp:TreeNodeBinding  SelectAction="SelectExpand"/>
    </DataBindings>
</asp:TreeView>

Private Sub PopulateRootLevel()
        Dim objConn As New SqlConnection(ConfigurationManager.ConnectionStrings("CONN").ToString)
        Dim objCommand As New SqlCommand("EXEC usr_qPS_GetFolders @uiParent, @uiUser", objConn)
        objCommand.Parameters.Add("@uiParent", SqlDbType.NChar).Value = ConfigurationManager.AppSettings("MENU").ToString
        objCommand.Parameters.Add("@uiUser", SqlDbType.NChar).Value = ConfigurationManager.AppSettings("USER").ToString

        Dim da As New SqlDataAdapter(objCommand)
        Dim dt As New DataTable()
        da.Fill(dt)

        PopulateNodes(dt, tvMenu.Nodes)
End Sub

Private Sub PopulateNodes(ByVal dt As DataTable, ByVal nodes As TreeNodeCollection)
        For Each dr As DataRow In dt.Rows
            Dim tn As New TreeNode()
            tn.Text = dr("sName").ToString()
            tn.Value = dr("uiFolder").ToString()

            If dr("sType").ToString.ToUpper = "FOLDER" Then
                tn.NavigateUrl = "Default.aspx?FolderID=" & dr("uiFolder").ToString()
            Else
                tn.NavigateUrl = "Default.aspx?DocID=" & dr("uiFolder").ToString()
            End If

            tn.SelectAction = TreeNodeSelectAction.SelectExpand
            nodes.Add(tn)

            'If node has child nodes, then enable on-demand populating
            tn.PopulateOnDemand = (CInt(dr("iHasDocs")) > 0)
        Next
End Sub

Private Sub PopulateSubLevel(ByVal uiParent As String, ByVal parentNode As TreeNode)
        Dim objConn As New SqlConnection(ConfigurationManager.ConnectionStrings("CONN").ToString)
        Dim objCommand As New SqlCommand("EXEC usr_get_menu @uiParent", objConn)
        objCommand.Parameters.Add("@uiParent", SqlDbType.NChar).Value = uiParent.ToString

        Dim da As New SqlDataAdapter(objCommand)
        Dim dt As New DataTable()
        da.Fill(dt)

        PopulateNodes(dt, parentNode.ChildNodes)
End Sub

Protected Sub tvMenu_TreeNodePopulate(ByVal sender As Object, ByVal e As System.Web.UI.WebControls.TreeNodeEventArgs) Handles tvMenu.TreeNodePopulate
        PopulateSubLevel(e.Node.Value, e.Node)
End Sub

jeg bliver helt rundtosset af den her... og den fungerer bare ikke...

hvordan tilføjer du niveau1 på træet ?

PopulateSubLevel(e.Node.Value, e.Node) event handleren

jeg tror måske ikke at du kan have navigatetourl og expand på samme punkt.

nu kom jeg tættere på løsningen med ikke at bruge navigate url og expand på samme tidspunkt...

Nå den er hjemme :) nu mangler jeg kun at style min menu.... send venligst et svar...

svar :)