调用ACCESS里的数据制作菜单，有二级分类

我在学习ASP,将HTML做成ASP,现调用ACCESS里的数据制作菜单，有二级分类。可一直报错。最近，接触ASP，作为一个女孩子，真的不知道选择是不是对的。头大的可以。希望有好新人，帮忙解答。初学的我，一头雾水。还希望，能够有耐心，不要嫌我笨。谢谢。代码：<%sub Top()%> <div id="header"> <div id="top"> <div class="floatleft"><img src="images/logo.jpg" alt="" /></div> <div class="textright"><a href="#">HOME /</a> <a href="#">CONTACT US /</a> <a href="#">SITEMAP</a></div> <div class="menu" > <%Sql="Select ID,A,C,D From Web Where Len(ID)=4 and IsNav=1 Order by O_ Asc" set Rs=Conn.Execute(Sql) do While Not Rs.Eof LinkMenu=LinkMenu& Rs(0)&"|"&Rs(1)&"|"&Rs(2)&"|"&Rs(3)&"@" Rs.MoveNext Loop Rs.Close if Len(LinkMenu)>1 then LinkMenu=Left(LinkMenu,Len(LinkMenu)-1) LinkMenu=split(LinkMenu,"@") %> <ul> <% for i=0 to ubound(LinkMenu)%> <li <%if i=0 then%>style="margin-left:0;" <%end if%>><a href="<%=split(LinkMenu(i),"|")(2)%>?ID=<%split(LinkMenu(i),"|")(0)%>&<%=split(LinkMenu(i),"|")(1)%>.html"><%=split(LinkMenu(i),"|")(1)%>　</a>|<%sql="select ID,A1,C,D from web where Isnav=1 and id like ✀"&split(LinkMenu(i),"|")(0)&"__✀ order by O_ asc"set rs=conn.execute(sql)if not rs.eof thenresponse.write "<ul>"do while not rs.eof%> <li><a href="<%=Rs(2)%>?ID=<%=Rs(0)%>&<%=(Rs(1))%>.html"><%=(Rs(1))%></a></li><% rs.movenext loop rs.close response.write "</ul>"end if%> </li><%next%> </ul> </div> </div></div><%end sub%>