Pelleplusmeny hämtas från databas

Har en pelleplusmeny som jag hämtar ifrån databas. (access) Och vill nu göra om den så att det kan finnas hur många undermenyer som helst. Undrar nu hur man skall skriva. Finns ett exempel på hans sida men kommer inte på riktigt hur man ska skriva iallafall.

Detta har jag nu:

<%Set RS = Conn.Execute("Select id,ucategory,category From shop_category Where ucategory=0 Order By category")
  If RS.EOF Then%>
    Inget inlagt
  <%Else%>
    <script src="inc/pplus2.js" type="text/javascript"></script>
    <script type="text/javascript">
      <%Do Until RS.EOF%>
        var PPlus = new PellePlus('<%=RS(2)%>');
          <%Set Umeny = Conn.Execute("Select id,category,ucategory From shop_category Where ucategory=" & RS(0) & " Order By category")
            Do Until Umeny.EOF%>
              PPlus.AppendRow('-<a href="viewproduct.asp?cat=<%=Umeny(0)%>" target="start" class="StyleContent"><%=Replace(Umeny(1),"""", "\""")%></a>');
            <%Umeny.MoveNext
            Loop
          Umeny.Close:Set Umeny=Nothing%>
        PPlus.SetStyles("Style", "StyleLink", "StyleContent");
        PPlus.SetGroup("meny");
        PPlus.WritePlus();
      <%RS.MoveNext
      Loop%>
    </script> 
  <%End If
RS.Close:Set RS=Nothing%>

http://www.dafid.nu/products/pelleplus/tut1_ex4.html