treeview控件是需要安装的,之后添加就可以了

解决方案 »

  1.   

    http://www.microsoft.com/china/MSDN/library/archives/library/DNAspp/html/aspnet-usingtreeviewieWebcontrol.asp
      

  2.   

    树控件使用小结
     --------------------------------------------------------------------------------
     
    时间:2004-9-9 17:22:59 来源:塔里木油田电脑网络学院 阅读3次 
       
    1.使用初步 
    (1)下载地址
    http://msdn.microsoft.com/downloads/samples/internet/default.asp?url=/Downloads/samples/Internet/ASP_DOT_NET_ServerControls/WebControls/default.asp
    (2)不显示树型的问题
    首先:下载包分自动安装和手动安装两种包。
    要下载大小约650K 的自动安装包。
    其次:TreeView要求客户端浏览器版本为IE5.5及以上,最好要求客户端升级为IE6.0(3)关于闪烁
    将AutoPostBack属性设置为真,SelectedIndexChange才能被执行。不过这样的话刷新的很厉害。不要刷新的话,将AutoPostBack属性设置为FALSE.    (4)常用的几个属性和方法
    ~Index 获取树节点在树节点集合中的位置。
    ~Nodes 获取分配给树视图控件的树节点集合。
    ~Parent  获取或设置控件的父容器。
    ~SelectedNode 获取或设置当前在树视图控件中选定的树节点。
    ~ExpandAll 展开所有树节点。
    ~Checked 获取或设置一个值,用以指示树节点是否处于选中状态。
    ~Text 获取或设置在树节点标签中显示的文本。
    ~Expand 展开树节点。
    ~Clear 清空树
    ~Remove 从树视图控件中移除当前树节点。
    2.用递归生成树的算法和数据库设计
    (1)递归说明
      程序调用自身的编程方法称为递归(recursion)。在树的生成以及图的遍历中,递归用的很多。经典的算法求 n! (求n的阶乘)中,用的就是递归方法。递归算法的优点就是简洁,可扩充性好。但是缺点也很明显:低效。因为递归就是程序不断调用自身,对系统的资源消耗比较大。随着节点的增多,执行效率会变的很低。 
      为了解决树在生成过程中的层树不定的问题,同时也是为了让树的扩展性更好。树的生成使用了递归的方法。生成树的代码一旦写成,可以不改动源代码,生成无限级层次的树。树的结构完全由数据库中表的数据决定。
    (2)数据库设计
      创建一个数据库,设计树图信息表Treetable,表中属性包含Nodeid、Parentid、Nodename、Address等字段(分别用于表示节点的ID、父节点ID、节点名称、链接地址),其它属性根据实际用户需求和设计而定。节点名称Nodename将在树型控件的节点上显示,Nodeid字段保存节点的唯一标识号,Parentid表示当前节点的父节点ID号(例如有两个节点是父子关系,孩子节点的Parentid值就是其父节点的Nodeid),节点号父子相接组成了一个“链表”,表征并记录了树上节点的层次结构。
    表具体设计如下:(简化模型,实际使用的要复杂一些)主键 属性名 类型 长度 可空 属性含义
    是 Nodeid int 6 否 节点ID
     Parentid int 6 否 父节点ID
     Nodename char 50 否 节点名称
     Address char 80 可 链接地址备注:链接地址 主要是用在: 树在框架中使用的环境。链接可以指向其他框架页中的地址或是带不同的参数。
        (3)程序代码
    ――――――――――――递归函数――――――――――――
        '生成树的函数
        Private Sub inittree(ByRef Nds As Microsoft.Web.UI.WebControls.TreeNodeCollection, ByVal parentId As Integer)
            Dim dv As New DataView()
            Dim dvrow As DataRowView
            Dim tmpNode As Microsoft.Web.UI.WebControls.TreeNode
            'intId为数值型变量,其作用是记录并传递当前记录的ID,做为它子节点的PARENTID值
            Dim intId As Integer
            dv.Table = mySet.Tables("paybasic")
            'parentId传递的是 additem函数中的intId.下面语句的作用是找出当前节点的子孩子集合。 
            dv.RowFilter = "parentID='" & parentId & "'"
            '如果当前节点有孩子,则遍历所有的孩子,并调用递归函数。
            For Each dvrow In dv
                tmpNode = New Microsoft.Web.UI.WebControls.TreeNode()
                '为当前节点的各个属性赋值。
                tmpNode.ID = dvrow("nodeID")
                tmpNode.Text = dvrow("nodename")
                tmpNode.NavigateUrl = dvrow("Address")
                intId = dvrow("parentID")
                '添加一个节点
                Nds.Add(tmpNode)
                '调用递归函数
                inittree(Nds(Nds.Count - 1).Nodes, intId)
            Next
    End Sub
    ――――――――――――――――调用递归函数――――――――――――――――――
    CreateReaderDataSet()
    inittree(Treepaybasic.Nodes, 999)
    ―――――――――――――――――生成数据集―――――――――――――――――――
        '生成数据集的函数
        Private Sub CreateReaderDataSet()
            '在运行时连接,并设置连接属性
            MyConn = New System.Data.OleDb.OleDbConnection("Provider=MSDAORA.1;Data Source=oracle9;User ID=user;Password=****;")
            '设置SelectCommand命令
            myAdapter.SelectCommand = New System.Data.OleDb.OleDbCommand("select * from treenode", MyConn)
            '填充数据集
            myAdapter.Fill(mySet, "treenode")
        End Sub与数据库相关的节点操作:
    (1)添加节点
      1.1 节点的树型添加
            //程序的功能是在点击的节点下面添加新节点
            Dim tmpNd3 As New Microsoft.Web.UI.WebControls.TreeNode()
            Dim NdSel As New Microsoft.Web.UI.WebControls.TreeNode()
            'NdSel 为当前选定的要删除节点,tmpNd3为它的父节点 
            NdSel = Treepaybasic.GetNodeFromIndex(Treepaybasic.SelectedNodeIndex)
            '要添加的节点的各个属性
            tmpNd3.ID = 111
            tmpNd3.Text = "aaa"
            '用nodes.add添加节点
            NdSel.Nodes.Add(tmpNd3)
               
        1.2 数据库中的节点添加操作
                //数据库连接语句在此省略
                '在运行时连接,并设置连接属性
                Dim insertcomm = New System.Data.OleDb.OleDbCommand()
                '定义存储命令的各种属性
                insertcomm.CommandText = "insert into treebasic(id,parentid,name)      values('" & pid & "','" & parid & "','" & nodetext & "')"
                insertcomm.Connection = MyConn
                '打开连接、执行命令
                MyConn.Open()
                insertcomm.ExecuteNonQuery()
                MyConn.Close()
    (2)修改节点
      2.1 节点属性的树型修改
            Dim tmpNd3 As New Microsoft.Web.UI.WebControls.TreeNode()
            'tmpNd3 为当前选定的节点
            tmpNd3 = Treepaybasic.GetNodeFromIndex(Treepaybasic.SelectedNodeIndex)
            tmpNd3.Text = "aaa"
      2.2 数据库中的节点属性修改操作
                '定义修改命令的属性
                Dim updatecomm = New System.Data.OleDb.OleDbCommand()
                '定义修改命令的各种属性
                  updatecomm.CommandText = "update treebasic set name='" & nodetext & "' ,re='" & re & "' ,links='" & purl & "' where payid=" & CInt(pid) & ""
                updatecomm.Connection = MyConn
                '打开连接、执行命令
                MyConn.Open()
                updatecomm.ExecuteNonQuery()
                MyConn.Close()//展开所有的节点
    private void expand(TreeNode node)
    {
     if(node.Nodes.Count>0)
     {
      node.Expanded=true;
      foreach(TreeNode tempNode in node.Nodes)
      {
       expand(tempNode);
      }
     }
    }
    1)节点的展开
            '用于已经知道要展开节点index值的时候
            Dim tmpNd As Microsoft.Web.UI.WebControls.TreeNode
            tmpNd = New Microsoft.Web.UI.WebControls.TreeNode()tmpNd = Treepaybasic.GetNodeFromIndex(Treepaybasic.SelectedNodeIndex)
            tmpNd.Expanded = True
    (2) 判断节点在第几层
            '点击treeview控件某个节点时, 判断该节点位于哪一层
            '判断index中"."的个数即可知道节点在那层。
            Dim NdSel As New Microsoft.Web.UI.WebControls.TreeNode()
            ''NdSel 为当前选定的节点 
            NdSel = Treepaybasic.GetNodeFromIndex(Treepaybasic.SelectedNodeIndex)
            Dim index As String = NdSel.GetNodeIndex()
            dim level as Integer = index.Length - index.Replace(".", "").Length + 1