codice:
<%
Dim oTree, html
Set oTree = Server.CreateObject("obout_ASPTreeview_2.Tree")
' Populate Treeview.
oTree.Add "root", "a0", "obout.com 1", false
oTree.Add "a0", "a0_0", "ASP TreeView"
oTree.Add "root", "a0", "obout.com 2", false
oTree.Add "a0", "a0_0", "ASP TreeView"
oTree.Add "root", "a0", "obout.com 3", true
oTree.Add "a0", "a0_0", "ASP TreeView"
oTree.Add "a0", "a0_1", "Fast"
oTree.Add "a0", "a0_2", "Easy", , "page.gif"
oTree.Add "root", "a1", "Links & Notes since 1998", true, "book.gif"
html = "xxx"
oTree.Add "a1", "a1_0", html
oTree.FolderIcons = "/TreeIcons/Icons"
oTree.FolderScript = "/TreeIcons/Script"
' Select style.
oTree.FolderStyle = "/TreeIcons/Styles/White"
' "/TreeIcons/Styles/MSDN"
' "/TreeIcons/Styles/Explorer"
' See more styles in the folder.
oTree.ShowIcons = false
oTree.Width = "200px"
'Write treeview to your page.
Response.Write oTree.HTML()
Set oTree = Nothing
'-------------------------- End of example --------------------------
%>
Il codice fa parte di uno degli esempi dello script che ho scaricato.
Non capisco se manca qualcosa!!!
PS: Sono neofita in ASP, almeno per le cose di livello più serio...
Grazie