查询导航HAIRUICMS
<%
set NavListRs=server.CreateObject("adodb.recordset")
NavListRs.open "select Name,Url from Cuz_Menu order by Seq asc",conn,1,1
...
<%
set NavListRs=server.CreateObject("adodb.recordset")
NavListRs.open "select Name,Url from Cuz_Menu order by Seq asc",conn,1,1
do while not NavListRs.eof
%>
<li><a href="<%=NavListRs("Url")%>"><%=NavListRs("Name")%></a></li>
<%
NavListRs.movenext
loop
NavListRs.close
set NavListRs=nothing
%>
上一篇：查询指定栏目下的信息列表
下一篇：查询指定单页的内容
我要评论