花香HXCMS V9.0 动漫频道

'dim i:i=10 Set Rs=conn.Execute("Select id,name,ItemName From [Hx_menu] Where ModuleID=7") do while not Rs.eof %> <div class="menutitle" onclick="SwitchMenu('sub4<%=i%>')"><img src="../img/left_fold1.gif" alt="" border="0"> <%=Rs(1)%>频道管理 <TABLE width="158" cellSpacing="0" cellPadding="0" border="0"> <TR> <TD height="5"></TD> </TR> <TR> <TD bgColor="#ffffff" height="1"></TD> </TR> </TABLE> </div> <span class="submenu" id="sub4<%=i%>"> <TABLE cellSpacing="0" cellPadding="0" width="158" background="../img/menu_2.gif" border="0"> <TR> <td width="25%"></td><TD height=25 width="75%"><a target="main" href=admin_flash.asp?action=piccat&ChannelID=<%=Rs(0)%>><img src="../img/left_fold2.gif" alt="" border="0"> 分类管理</a></TD> </TR> <TR> <td width="25%"></td><TD height=25 width="75%"><a target="main" href=admin_flash.asp?action=newpiccat&ChannelID=<%=Rs(0)%>><img src="../img/left_fold2.gif" alt="" border="0"> 添加分类</a></TD> </TR> <TR> <td width="25%"></td><TD height=25 width="75%"><a target="main" href=admin_flash.asp?action=pic&ChannelID=<%=Rs(0)%>><img src="../img/left_fold2.gif" alt="" border="0"> <%=Rs(2)%>管理</a></TD> </TR> <TR> <td width="25%"></td><TD height=25 width="75%"><a href="admin_flash.asp?action=newpic&ChannelID=<%=Rs(0)%>" target="main"><img src="../img/left_fold2.gif" alt="" border="0"> 添加<%=Rs(2)%></a></TD> </TR> <TR> <td width="25%"></td><TD height=25 width="75%"><a target="main" href=admin_flash.asp?action=pic&t=pass&ChannelID=<%=Rs(0)%>><img src="../img/left_fold2.gif" alt="" border="0"> 待审<%=Rs(2)%></a></TD> </TR> <TR> <td width="25%"></td><TD height=25 width="75%"><a target="main" href=admin_skin.asp?action=showskin&t=<%=Rs(0)%>><img src="../img/left_fold2.gif" alt="" border="0"> <%=Rs(1)%>模板管理</a></TD> </TR> </table> </span> <TABLE width="158" cellSpacing="0" cellPadding="0" border="0"> <TR> <TD height="5" background="../img/menu_1.gif"></TD> </TR> </TABLE> <% i=i+1 Rs.movenext Loop Rs.close Set Rs=Nothing %>