strsql = "SELECT tblCategory.Root, tblCategory.[ID], tblCategory.Sort
AS CatSort, tblPages.sort AS LinkSort, tblCategory.[Name] AS CatName,
tblCategory.HREF AS CatURL, tblPages.[Name] AS LinkName, tblPages.href
AS LinkURL FROM tblCategory LEFT JOIN tblPages ON tblCategory.[ID] = tblPages.[ID]
ORDER BY tblCategory.root ASC, tblCategory.Sort, tblPages.sort"
rs.open strsql, conn, 2, 2
if not rs.eof then rs.movefirst
currentID = "" %>
〈html>
〈head>
〈link rel="stylesheet" href="ftie4style.css">
〈!-- Infrastructure code for the tree -->
〈script src="ftiens4.js">〈/script>
〈!-- Execution of the code that actually builds the specific tree -->