<% '======================================== ' BUILDING A TREE PROGRAMATICALLY '======================================== ' This approach would be best suited for building ' dynamic trees using For..Next loops and such. Set MyTree2 = New Tree MyTree2.Top = 10 MyTree2.Left = 10 MyTree2.ExpandImage = "plus.gif" MyTree2.CollapseImage = "minus.gif" MyTree2.LeafImage = "webpage.gif" ' Notice the indentation used to reprensent the hierarchy Set Node1 = MyTree2.CreateChild("script") Set SubNode1 = Node1.CreateChild("server") Set secSubNode1 = SubNode1.CreateChild("html") secSubNode1.CreateChild "asp" secSubNode1.CreateChild "php" secSubNode1.CreateChild "jsp" Set SubNode2 = Node1.CreateChild("os") SubNode2.CreateChild "winnt" SubNode2.CreateChild "win2000" Set Node2 = MyTree2.CreateChild("Desktop") Node2.CreateChild "Area Code Lookup" Node2.CreateChild "Arin Based Whois Search" Node2.CreateChild "World Time Zone Map" MyTree2.Draw() Set MyTree2 = Nothing %>