关闭

哪位大牛帮我写个下拉菜单、动态的导航

53人阅读 评论(0) 收藏 举报
顶部的function head里源码:

<%
function Head()
  dim rs,sql
  set rs = server.createobject("adodb.recordset")
  sql="select * from Navigation where ViewFlag=1 order by Sequence asc"
  rs.open sql,conn,1,1
  response.Write("<table width=950  border=0 align=center cellpadding=0 cellspacing=0 background="&SitePath&"Images/menu.gif>")
  response.Write("<tr><td >")
  response.Write("<table width='99%' height=30  border=0  cellpadding=0 cellspacing=0 >")
  if rs.bof and rs.eof then
    response.write "<tr><td height='28' align='center'><font color='white'>暂无导航链接</font></td></tr>"
  else
    response.write "<tr>"
    do
   response.write "<td height='30' align='center'><a href='"&rs("NavUrl")&"'><b><FONT size=2.9 color="&rs("FontCor")&">"&rs("NavName")&"</font></b></a></td>"
   rs.movenext
 loop until rs.eof
    response.write "</tr>"
  end if
  response.Write("</table>")
  response.Write("</td></tr></table>")
  rs.close
  set rs=nothing
End function
%>

一个导航实际上就是一个栏目版块,下拉菜单的内容即为各导航指向的版块的顶级分类。(能在下拉菜单做出下级的分类更好)

0
0

猜你在找
【直播】机器学习&数据挖掘7周实训--韦玮
【套餐】系统集成项目管理工程师顺利通关--徐朋
【直播】3小时掌握Docker最佳实战-徐西宁
【套餐】机器学习系列套餐(算法+实战)--唐宇迪
【直播】计算机视觉原理及实战--屈教授
【套餐】微信订阅号+服务号Java版 v2.0--翟东平
【直播】机器学习之矩阵--黄博士
【套餐】微信订阅号+服务号Java版 v2.0--翟东平
【直播】机器学习之凸优化--马博士
【套餐】Javascript 设计模式实战--曾亮
查看评论
* 以上用户言论只代表其个人观点,不代表CSDN网站的观点或立场
    个人资料
    • 访问:1339次
    • 积分:136
    • 等级:
    • 排名:千里之外
    • 原创:13篇
    • 转载:0篇
    • 译文:0篇
    • 评论:0条
    文章存档