ASP.NET中樹形圖的實現(1)

　　樹形圖用於顯示按照樹形結構進行組織的資料，其用途比較廣泛，如電腦中的檔案系統(Windows中的資源管理員)、企業或公司的組成結構等。我們知道在Windows下VB、PB、Delphi等工具提供了一個功能很強的樹型控制項TreeView，利用Treeview控制項可以方便地開發樹形圖。然而在網頁上實現樹形圖就不那麼容易了，現在在ASP.NET中利用微軟提供的Internet Explorer WebControls它使得網頁上的樹形圖開發與在Windows下一樣的方便，一樣的功能強大，甚至更靈活。

　　本文介紹用Internet Explorer WebControls開發樹形圖的方法，由於樹形圖結構較複雜，使用起來常不知如何下手。筆者結合最近剛為公司用ASP.NET編寫的應用程式管理器這一具體執行個體，詳細闡述在ASP.NET下如何將Internet Explorer WebControls的使用與資料庫聯絡起來，實現資料分任意多層顯示，方便地進行增加、修改、刪除、移動操作。筆者希望通過對該執行個體的闡述，達到拋磚引玉的效果，與各位同仁相互交流，共同進步。

　　Internet Explorer WebControls不在VS.NET的標準Server Control中，要到微軟的網站上下載，是：http://msdn.microsoft.com/downloads/samples/internet/default.asp?url=/Downloads/samples/Internet/ASP_DOT_NET_ServerControls/WebControls/default.asp 下載安裝後第一次使用時，要右擊工具箱Customize Toolbox…→.NET Framework Components中找到Micosoft.Web.UI.WebControls.Treeview後選中，這樣Treeview控制項就出現在工具箱中了。

　　一、樹的建立

　　具體方法是：建立一個資料庫，設計樹圖資訊表TREE_INFO，包含NODEID、PARENTID、NODENAME、ADDERSS、ICON欄位，其它欄位根據實際業務而定，節點名稱NODENAME將在樹型控制項的節點上顯示，NODEID欄位儲存節點的唯一標識號，PARENTID表示當前節點的父節點號，標識號組成了一個“鏈表”，記錄了樹上節點的結構。設計一個Web表單其上放置TreeView控制項。

Private Sub CreateDataSet()’建立資料集
Dim myConn As New SqlConnection()
Dim myCmd As New SqlCommand("select NODEID,NODENAME,PARENTID,ADDRESS,ICON from Tree_info", myConn)
Dim myDataAdapter As New SqlDataAdapter()
myConn.ConnectionString = Application("connectstring")
myCmd.CommandText = ""
myCmd.Connection = myConn
myDataAdapter.SelectCommand = myCmd
myDataAdapter.Fill(ds, "tree")
End Sub

　　建樹的基本思路是：從根節點開始遞迴調用顯示子樹

Private Sub Page_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load CreateDataSet() intiTree(TreeView1.Nodes, 0) End Sub Private Sub intiTree(ByRef Nds As TreeNodeCollection, ByVal parentId As Integer) Dim dv As New DataView() Dim drv As DataRowView Dim tmpNd As TreeNode Dim intId As Integer dv.Table = ds.Tables("tree") dv.RowFilter = "PARENTID=’" & parentId & "’" For Each drv In dv tmpNd = New TreeNode() strId = drv("NODE_ID") tmpNd.ID = strId tmpNd.Text = drv("NODE_NAME ") tmpNd.ImageUrl = drv("ICON").ToString Nds.Add(tmpNd) intiTree(Nds(Nds.Count - 1).Nodes, intId) Next End Sub